VC转DELPHI的一小段代码定义,,如何转换请教?谢了!(10分)

A

awen168

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #1

VC代码:
int num;
char order[5];
order[0]=num;
order[1]=0x1b;
order[2]=0x1b;
order[3]=0x52;
转换DELPHI代码为:

目的:向串口发送指令:01 1b 1b 52

 

W

weiwei81123

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #2

var
num:integer;
order:array[0..4]of char;
begin
order[0] := char(num);
order[1] := #$1b;
...

 

A

awen168

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #3

谢了