Delphi 字符串转为字节数组
info : String; info := "中国南京 ChinaNanJing"; 求助:怎么把字符串info的内容转换为十六进制的字节数组?
asc码吧? i:=1 to length(info) inttohex(ord(info[i]),2) 何为"十六进制的字节数组"? 1楼:我试一试! 2楼: 如 aArr : array[0..1] of byte; aArr[0] := $10; aArr[1] := $11; Delphi(Pascal) code: procedure TForm1.Button1Click(Sender: TObject); var I : Integer; str : string; test : array[0..49] of char; ByteArr : Array[0..49] of string; begin str := '中国南京ChinaNanJing'; Move(str[1],Test[0],Length(str)); for I := 0 to Length(Test)-1 do begin ByteArr[I] := IntToHex(ord(Test[I]),2); end; for I := 0 to Length(ByteArr)-1 do self.Memo1.Lines.Add(ByteArr[I]); end; 这里有个问题,汉字是占2个字节。引用 1楼:我试一试! 2楼: 如 aArr : array[0..1] of byte; aArr[0] := $10; aArr[1] := $11; 这样的话, 根本不用转换, String类型本身就是这样存储的 麻烦大家写点注释在程序里,我对Delphi基本文盲。 5楼:虽然这样也要把String加入到byte[]里去呀,怎么加入进去呢?
相关问答:
VC 控制台程序: #include <iostream> using namespace std; int main() { const int def_buffer = 1024 * 4; DWORD t; BYTE b[def_buffer]; memset(b, 0, sizeof(b)); PBYTE p; t = GetTickC ......
一般都是怎么接活的? 收入怎么样 sohu?soho? sohu 可能是small office house unit 小办公室,把家变成单位。 去威客网啊,很多个呢,还有外包的网站 学习学习。 现在Delphi做东西不行了,处于淘汰状 ......
急用。联系QQ:8775262,谢谢。 需要进行DllImport的地方直接写DLLImport.方法名。 如:DLLImport.GlobalAddAtom(……); 文件:UShare.pas Delphi(Pascal) code: unit UShare; interface uses Windows, Me ......
IF THEN ELSE中多个条件怎么写,如:字符串S1,S2,S3,S4均要不为空。 怎么样把它写到IF中去? 请各位帮帮忙,谢谢! if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then begin ......
我怎么查了那么多说是能破解的.结果都不行.你们有没有呀.给我个详细的解决方案.下载哪个版本.破解文件,还有注册码 不清楚 下载官方光盘镜像,用delphidistiller1.85破解 到www.2ccc.com上去找delphidis ......