var
Tempstr:pchar;
content:string;
a:integer;
begin
for a:=0 to 59 do
content:=content+'x';
for a:=0 to 2 do
begin
TempStr:=pchar('AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AB'+'AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AB'+content); //我想把AA的位置,变成传送ASCII码AA,如何实现?
socket.SendText(TempStr);
end;
end;
Tempstr:pchar;
content:string;
a:integer;
begin
for a:=0 to 59 do
content:=content+'x';
for a:=0 to 2 do
begin
TempStr:=pchar('AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AB'+'AA'+'AA'+'AA'+'AA'+'AA'+'AA'+'AB'+content); //我想把AA的位置,变成传送ASCII码AA,如何实现?
socket.SendText(TempStr);
end;
end;
ASCII是基于单个字符的统一编码,在DOS时代就奠定了不可动摇的基础!
每个字符,包括制表符号,特殊符号都有一席之地!以后为了适应国际化,出现了Unicode,但是Unicode也给Ascii留了兼容的地位.
无论是Ascii,还是unicode,都是针对一个字符(包括多字节字符)编码.