delphi中对象的定义,以及他们在pas中的位置放在那,以及如何实例化,

解决方案 »

  1.   

    interfaceuses
      Windows, Messages;type
      TForm1 = class(TForm)
      private
        { Private declarations }
      public
        { Public declarations }
      end;  TTest = class
      private
        { Private declarations }
       a: String;
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementationprocedure TForm1.FormCreate(Sender: TObject);
    var
     Test: TTest;
    begin
     Test := TTest.Create;
     ....end;
    end.
      

  2.   

    看一下delphi的源码,里面都是对像