Pchar和String类型之间的相互转换

Question

1．
有一个MyChar: Pchar的变量，现在需要将其中的值存储起来；TempStr是一个Stringl类型的变量。
(这个MyChar的LenChar)
for I := 0 to LenChar – 1 do 
begin
TempStr[I + 1] := MyChar[i];
end;
//下面是存储到数据库中
…….
AdoDataSet.FieldByName(‘MyText’).AsString := TempStr;
…….
问题一：这样子保存是否可以保证信息不丢失？2．
当需要的时候，想从数据库中取这个值
TempStr := AdoDataSet.FieldByName(‘MyText’).AsString;
For I := 0 to LenChar – 1 do 
Begin
MyChar[i] := TempStr[I + 1];
End;
问题二：是否可以保证数据准确?

Answer 1

不需要用循环
StrPCopy函数可以将一个String转换成PChar;
StrPas函数可以将一个PChar转换成String;

Answer 2

PChar(String)
String=StrPas(PChar)