如何给olevariant赋值 ( 积分: 50 )

I

InterPrise

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-22

• #1

最近调用外部的com，其中一个属性为olevariant，主要接受实型的，但每当一赋值，就变成了2.56e290,请问如何解决，谢了。分少，无怪

 

I

InterPrise

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-22

• #2

最近调用外部的com，其中一个属性为olevariant，主要接受实型的，但每当一赋值，就变成了2.56e290,请问如何解决，谢了。分少，无怪

 

X

xianguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-22

• #3

最好用字符型进行传递
AiBuffer01 := VarArrayCreate([0, N], VarOleStr);
AiBuffer01[0] := Edit1.Text;
AiBuffer01[1] := Edit2.Text;
...
AiBuffer01[N] := EditN.Text;

 

I

InterPrise

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-22

• #4

参照以上做法如下：
AiBuffer01[0] := '3000';
showmessage (oIVehicleInputs.GetVehicleInputByNumber(1).AttValue['VOLUME']);
oIVehicleInputs.GetVehicleInputByNumber(1).AttValue['VOLUME'] := AiBuffer01[0] ;
showmessage (AiBuffer01[0]);

但还是不行[]

 

I

InterPrise

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-22

• #5

帮帮我啊！！多谢多谢