如何把Pointer类型的值赋给Olevariant;(50分)

zlj555 · 2002-05-20

我用
function GetName(AName : string):variant;
var
abc : Pointer
begin
......
Result := abc ;//不行，我该如何做。
end;

gxcooo · 2002-05-20

result:=abc^
你要是确实要得是指针，那你就
Result := Integer(abc);
用的时候再换过来：
Pointer(abc);

superljj · 2002-05-20

好像不能把指针和结构转化成variant

zlj555 · 2002-05-20

没能成功呀。

peihexian · 2002-05-30

要传指针给variant，就只能传integer,因为在现在windows中pointer是32的,integer也
是32位的,要不你就传值得了。

Pearl. · 2002-05-30

传指针有什么用呀？
既然都必须用到OLEVariant类型了，显然接下去的操作者和你现在的程序不在同一个内存寻址空间内，给它你的指针它也无法访问。

zlj555 · 2003-01-15

多人接受答案了。