过来看看

Question

RFICCAREA120_DATA(0)要在pascal中是pchar型　
Money是string型

Answer 1

说清楚点吧
我看在VB中是这样写的
RFICCAREA120_DATA(0) = (Money And &HFF0000) / &H10000在delphi中我写成这样，不能运行
var data_buffer:pchar;
    money:string;
data_buffer[1]:=pchar((strtofloat(Money) And $FF0000)/$10000);
请指教

Answer 2

浮点数本来就不支持And操作，你参考下面这个例子试试：var Cmd:pchar;
    CheckSum:Integer;
begin
  GetMem(Cmd,5);
  Cmd[0]:=chr($AA);
  Cmd[1]:=chr($55);
  Cmd[2]:=chr($F2);
  CheckSum:=Check_sum(Cmd,3);
  Cmd[3]:=chr(CheckSum and $FF);
  Cmd[4]:=chr($0);
  SendCmd(Cmd,4);
  FreeMem(Cmd);
end;

Answer 3

gototop99(巴蒂)　
谢谢你帮我提前，难道真的这么难吗？

Answer 4

pchar 类型要先分配内存的。
否则会出错，你可以先用函数stralloc()
给变量分配内存。

Answer 5

outer2000(天外流星)
首先，谢谢你的回答，但这种低级错误我是不会犯的.
我已经GetMem(data_buffer,255).
高手帮忙,分不够，我再加