如何将DELPHI 的STRING 类型 与CHAR 类型转换。

[wsfzhy]

A：CHAR；
S：STRING；
I，J，SUM：INTEGER；
FOR J：=1 TO LENGTH（S）DO BEGIN
A：=？（COPY（S，I，1）；
I：=ORD（A）；
SUM：=SUM+I；
END；
我想取S 的每个字符的ASCII码值。？应为什么函数。才能使ORD（A）值正确。
PCHAR（）函数不正确。请指教。

[hawk0000]

不用转换
I:=ord(s[i])// i为0,1,2...

[haoco]

可以这样啊：
A：CHAR；
S：STRING；
I，J，SUM：INTEGER；
FOR J：=1 TO LENGTH（S）DO BEGIN
{A：=？（COPY（S，I，1）；} //去掉这一句
A:=Ord(S[j]);
I：=ORD（A）；
SUM：=SUM+I；
END；

[firetoucher]

A：=S[I]；

[DWGZ]

FOR J：=1 TO LENGTH（S）DO BEGIN
A：=S[I]；
I：=ORD（A）；
SUM：=SUM+I；
END；

[ziqing]

同意二楼的

[GoldProgramer]

String实际上就是Char的数组。

[bbs791109]

樓上的都對。

[zlyanyan]

CopyMemory(@C,@S[1],Length(S));
注意 S为AnsiString，如果是WideString请先转换成AnsiString
该函数是Win Api,在Windows.Pas里
procedure CopyMemory(Destination: Pointer; Source: Pointer; Length: DWORD);
不过Borland用他自己的方法实现的。


the CopyMemory function copies a block of memory from one location to another.

VOID CopyMemory (

PVOID Destination, // address of copy destination
CONST VOID *Source, // address of block to copy
DWORD Length // size, in bytes, of block to copy
);


Return Values

This function has no return value.

[lion_lh]

A：=S[I]；

[sheepcyk]

S[I]就是一个char字符

[jorge]

来晚啦~~~~~~~~~~
up