易截截图软件、单文件、免安装、纯绿色、仅160KB

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 Delphi 内存速度比较 - VC/MFC / 非技术类

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 ......

请教下,用DELPHI做SOHU的 - Delphi / 非技术区

一般都是怎么接活的?
收入怎么样
sohu?soho?

sohu 可能是small office house unit
小办公室,把家变成单位。

去威客网啊,很多个呢,还有外包的网站

学习学习。

现在Delphi做东西不行了,处于淘汰状 ......

求一段delphi代码转C#代码,急用,可人民币支付,谢谢

急用。联系QQ:8775262,谢谢。
需要进行DllImport的地方直接写DLLImport.方法名。
如:DLLImport.GlobalAddAtom(……);
文件:UShare.pas
Delphi(Pascal) code:

unit UShare;
interface
uses Windows, Me ......

delphi简单问题

IF THEN ELSE中多个条件怎么写,如:字符串S1,S2,S3,S4均要不为空。
怎么样把它写到IF中去?
请各位帮帮忙,谢谢!
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin ......

delphi 2010 有破解的吗?给个详细的.

我怎么查了那么多说是能破解的.结果都不行.你们有没有呀.给我个详细的解决方案.下载哪个版本.破解文件,还有注册码
不清楚

下载官方光盘镜像,用delphidistiller1.85破解

到www.2ccc.com上去找delphidis ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号