大家快来帮帮我啊！如何将string转换成char啊

Question

如何将string转换成char啊

Answer 1

var
  s:String;
begin
 s:='s';
 s[1]:='a';
 showMessage(s[1]);

Answer 2

var
  s:String;
  c: array [0..100] of Char;
begin
  s:='11111111';
  CopyMemory(@c[0], @s[1], Length(S));
end;

Answer 3

其实string应该可以当作一个字符数组，所以您尽可以象上面几位大侠所说的使用。如：
var
  s: string;
  c: char;
begin
  s := 'I Love You!';
  c := s[1]; // c = 'I'
end;

Answer 4

var
  s:String;
  c: array [0..100] of Char;
  i:integer;
begin
  s:='11111111';
  for i:=0 to Length(S)-1 do
  begin
   c[i]:=s[i];
  end; 
end;

Answer 5

var
  s: string;
  c: char;
begin
  s := 'I Love You!';
  c :=char(s);
end;

Answer 6

string本质上讲本来就是一个数组mystr : Stringmystr[0]   ---> 存放的是数组的长度
mystr[1]之后存放的是实际数据所以通过改变mystr[0]的数据大小就可以实现字符串（其实就是数组啦）的截位与扩容

Answer 7

看来答得差不多了，那我就up、up吧 :)

Answer 8

var
  s:String;
  c: array [0..100] of Char;
begin
  s:='11111111';
  CopyMemory(@c[0], @s[1], Length(S));
end;

Answer 9

string就是N个char型的字符组成的串，只要一次只取出一个的话，就是char型的否则就是string型的~~

Answer 10

我还有个问题，怎么将edit.text中的string型改成数值型（如integer）?

Answer 11

ft
你多查查SDK嘛~
基本的类型转换你应该要知道的呀var
   mystr : String;
   myint : Integer;
Begin
   mystr := Edit1.Text;
   myint := StrtoInt(mystr)
End注意，请确认该Edit的text可以被转换为整型

Answer 12

var
  s:String;
begin
 s:='s';
 s[1]:='a';
 showMessage(s[1]);

Answer 13

我都不知道string转化为char到底什么意思……

Answer 14

谢谢loveyank！我刚刚学delphi，我会好好努力！来csdn真挺好的！

Answer 15

s:='abc';
s[1]='a';
依次类推。