怎樣將字符串类型轉换为字符类型?(100分)

秋日

Unregistered / Unconfirmed
GUEST, unregistred user!
我想将一个字符串(string)类型的值转换为一个字符(char)类型的值,请问转换函数是什么?(因為ord函數支持字符類型,而我要用ord函數進行密碼加密.),請各位高手答複!
 
str:string;

str[1] 就是一个 char 类型啊,不知道你想干什么
 
转成字符数组吧,用Copy试试
 
procedure TForm1.Button2Click(Sender: TObject);
var
s:string;
c:array[0..100] of char;
i:integer;
begin
s:='12346';
//不需要转换
for i:=1 to length(s) do
showmessage(inttostr(ord(s)));
//转换这样做
for i:=1 to length(s) do
c[i-1]:=s;
c[length(s)]:=#0;
showmessage(c);

end;
 
如xiaolin0522所说,你应该学学delphi的数据类型
 
先变成WIDEstring,然后由WIDEstring[1] TO Length(WIDEstring)
放在WIDECHAR数组里;
 
多看一点基础知识
 
接受答案了.
 
顶部