小弟接触delphi两周,敢请各位大哥帮忙
我只懂得基本控件的属性操作和基本object pascal语句

解决方案 »

  1.   

    TClass1 = class
    {
    };呵呵,怎么样,已经是“写一个类”了。
    看看面向对象的书吧,即使是C++的也行。
      

  2.   

    Type 
        Myobject = class
       privated
                m_dataset :Tdatasource;
            function  Set_datasource(ds: Tdatasource): boolean;
            function  Get_datasource:Tdatasource;
       public 
              function Savedata(ds: Tdatasource):boolean; virtual; abstract;
       end;