L liuguilg Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-14 #1 指针变量如何转化为oleVariant, 赋值给oleVariant类型的变量
Z zhengrong117 Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-14 #2 procedure TForm1.btn1Click(Sender: TObject);var i:Integer; pint; OaleVariant;begin i:=1000; p:=@i; Oa:=p^; Self.Caption:=VarToStr(Oa);end;//没完全明白你的意思,就按照自己理解的写了下
procedure TForm1.btn1Click(Sender: TObject);var i:Integer; pint; OaleVariant;begin i:=1000; p:=@i; Oa:=p^; Self.Caption:=VarToStr(Oa);end;//没完全明白你的意思,就按照自己理解的写了下
H hs-kill Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-14 #3 你是要指针指向的内容 还是指针本身的地址值如果是地址值,直接olev:=integer(pointer)就行如果是指针内容,那么就要自己吧内容都取出来在复制到olevar变量内存里了