如何让一个delphi的类继承一个窗体,同时实现一个自己定义的接口

各位帮忙写段简单的示例代码

解决方案 »

  1.   

    type 
    //定义接口
    i = interface
    procedure method1;
    end;//继承并实现接口.
    tf = class(TForm1,i)
    procedure method1;
    end;end;
      

  2.   

    to koy0755(koy) 
    可是网上说这样实现还是有陷阱啊
    (http://dev.yesky.com/SoftChannel/72342371928440832/20040924/1858199.shtml),所以想找个既简单又不太麻烦的实现方法.
      

  3.   

    看到那些对delphi不了解又在那唧唧歪歪装大拿的白痴就好笑
      

  4.   

    1楼的就是最基本的方法了啊，搞Delphi的人都是这么用的，没见到有什么问题，你可以先试试啊！！
      

  5.   

    我在做c\s数据库时用的接口都是同1楼那种方法，但是我想请问一下大家，这样做没有发现什么好处啊，如果是为了函数的调用，那我可以直接在一个unit里写函数啊，请大侠指点接口的好处（不在多层中的）