我将一个object赋值给一个variant,但编译不通过。
那要用什么类型才能既能存简单类型,又能存object?

解决方案 »

  1.   

    呵呵,不好意思,你的要求应该就是Pointer
      

  2.   

    给你个代码实例,蹭点分
    type
        Tpo=^TForm1;//******************//
    procedure TForm1.Button1Click(Sender: TObject);
    var
      a:Tpo;
    begin
      a:=@self;
      a.Hide;  
    end;
      

  3.   

    Pointer可以,Integer也可以。做一下强制类型转换就成了。