Buffer: Pointer;中的内容显示在Memo1中,怎么办?(50分)

  • 主题发起人 主题发起人 daileking
  • 开始时间 开始时间
D

daileking

Unregistered / Unconfirmed
GUEST, unregistred user!
Buffer: Pointer;中的内容显示在Memo1中,怎么办?
怎么把指针类型转换成Ansistring类型的?
 
var buf : Pointer;
a: String;
begin
a:='akjdfakdjfakdsfjadf';//或者用其他手段给buf赋值
buf := pchar(a);
Memo1.Text := strpas(buf);
end;
 
直接用strpas函数就可以将针类型转换成Ansistring类型
 
SetString(S, P, StrLen(PChar(P)));

S := PChar(P);
S := StrPas(PChar(P));

SetLength(S, StrLen(PChar(P)));
Move(P^, S[1], StrLen(PChar(P)));
 
Memo1.Text := Memo1.Text + StrPas(PChar(Buffer));
 
接受答案了.
 
后退
顶部