怎样将string的第一个字符取出赋给一个char型变量

Question

怎样将string的第一个字符取出赋给一个char型变量

Answer 1

var
  C:Char;
  S:String;
begin
  S:='@11';
  C:=S[1];
end;

Answer 2

推荐使用
Copy(S, 1, 1)

Answer 3

Copy('1234',1,1)  //不可以var 
  c : Char ;
  s : String ;  s := '1234' ;
  c := S[1] ;
  ShowMessage(c) ;

Answer 4

这样做主要是怕产生错误,如s:='',这时s[1]会导致异常!这样就不会!
c:=PChar(Copy(s,1,1))[0];
c:=PChar(Copy(s,1,1))^直接用
Copy(s,1,1)
返回的是字符串

Answer 5

直接用
Copy(s,1,1)
返回的是字符串
--------------- ehom(？！) ：他的意思是 "赋给一个char型变量 "呀小哥

Answer 6

c:=PChar(Copy(s,1,1))[0]
c:=PChar(Copy(s,1,1))^不是"赋给一个char型变量 "吗?

Answer 7

char c
AnsiString text;
c=text[1];

Answer 8

当然
c:=PChar(s)^;
或
c:=PChar(s)[0]
也可那种方法更好,自己判断吧!

Answer 9

是呀 :)  ehom(？！)   强:),近视，^要写大点:)

Answer 10

直接使用
比如:
var  
  c:Char;
  s :string;
begin
  s :='abc';
  c :=s[0];
end;
这样c里面就是s里面的第一个字符'a'了

Answer 11

s[0]是什么?DELPHI 1.0以前可以表示字符串长度，但现在好像没用了吧？