有1字符串,T0E20061212101111,其中0E为16进制,换算为整数就是14,就是代表后面日期的长度,但我在delphi中怎样把整数14转换为0x0E(1位的字符,不是“0E”2位字符串),即0E算1个长度,T0E20061212101111的全部长度为14+1+1=16长。
解决方案 »
- 庆祝CSDN改版,散分200
- 如何获取CMOS信息
- 类似MSN、QQ那样托盘可以显示消息提醒和上线提醒是怎么做的
- 请问像鼠标事件触发之类的怎么写?
- 16*16的图标(ICON)在画布上画怎么变大了。
- 求教:程序的EXE文件本机运行良好,为何在别人机子上报错?
- 怎样写一个二进制流文件?
- 谢谢帮忙:如何在DbGrid里面的单元格里放CHECKBOX.
- 谁有用delphi 开发的短信群发平台
- 如何做ADO的安装程序
- ************第二次和刚认识的女孩见面就亲了人家,算快吗******************
- 怎样使用API函数mktime(在time.h里面声明),要uses哪个单元(或者怎么做)?
Tx2030,其中x应该为16进制的0x04,就是把4转换为16进制
sendbuf[1]:= ???
我怎么把X处变成16进制0x0E呢
s:string;
begin
s:='T'+inttohex(14,2)+'20061212101111';
showmessage( s );
sendbuf := pchar('T' + '0' + formatdatetime('yyyymmddhhmmss', now));
sendbuf[2] := chr(Byte(length(formatdatetime('yyyymmddhhmmss', now))));
S : string[255];
L : Char absolute S;
SendBuf : string;
begin
S := FormatDateTime('yyyymmddhhmmss', now);
SendBuf := 'T' + L + S;
end;