如何把string字符串转换pchar类型？？？

Question

如何把string字符串转换pchar类型？？？？

Answer 1

还想问：        怎样把string转换为array[..] of char型？？？

Answer 2

var
sChar : Array of Char;
iLoop,jLoop : Integer;begin
setLength(sChar,Length(String));
for iLoop := 0 to Length(String) - 1 do
begin
  sChar[jLoop] := PChar(String[iLoop]);
  jLoop := jLoop + 1;
end;

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var
str:string;
buf:array[0..100] of char;
begin
str := 'abc';
buf := #0;
move(str[1],buf,3);
showmessage(buf[3]);
end;

Answer 4

声明：showmessage(buf[3]);不需要

Answer 5

http://expert.csdn.net/Expert/topic/1179/1179445.xml?temp=.5465052
看看这张帖子，

Answer 6

string与array[1..255] of char 一样，只是多了个0单元，从string到array不用转换,直接用；反之只要加个0单元就可以了。

Answer 7

var
ss,a:staring
s,b:integer
ss为字符串
在type中设置，type
               bb:array[i,j] of 类型
b:=length('ss');
b:=b+1;
bigen
  s:=0;
  do while s<b 
  s:=s+1;
  a:=midstr('ss',s,1);
  bb[s]:=a;
end;