什么垃圾delphi
type library工具自动生成的
IDBEntity = interface(IDispatch)
    ['{95F31B61-7B08-446D-B241-50E3876D18FD}']
    procedure SetField(Index: Integer; Value: OleVariant); safecall;
    function  GetField(Index: Integer): OleVariant; safecall;
  end;// *********************************************************************//
// DispIntf:  IDBEntityDisp
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {95F31B61-7B08-446D-B241-50E3876D18FD}
// *********************************************************************//
  IDBEntityDisp = dispinterface
    ['{95F31B61-7B08-446D-B241-50E3876D18FD}']
    procedure SetField(Index: Integer; Value: OleVariant); dispid 1;
    function  GetField(Index: Integer): OleVariant; dispid 2;
  end;自己定义的类
type
  TDBEntity = class(TAutoObject, IDBEntity)
  public
    procedure SetField(Index: Integer; Value: OleVariant);
    function GetField(Index: Integer): OleVariant;
end;编译说:
Declaration of "SetField" differs from declaration in interface "IDBEntity "
Declaration of "GetField" differs from declaration in interface "IDBEntity "成员声明我是copy过来的,妈的,报错也太离谱了吧。
还有哪个什么type library工具,变态的,自动生成的文件,我一保存,就给自动修改了。靠,一定要用工具改接口呀.
自带的帮助文件烂得要死,不爽

解决方案 »

  1.   

    老大,你对type library不熟,不理解,你能COPY 东东到type library里面吗?
      

  2.   

    楼主也太
    多学些,不会用可以不用DELPHI
      

  3.   

    我寝室有个人老说delphi怎么怎么烂...我都想揍他了!!!
      

  4.   

    劝你还是别用delphi了,去用"最高级"的C#吧,保证不烂
      

  5.   

    copy 也没对啊, 没有 safecall 修饰符啊这都没搞明白, 要是用 C++ 写 COM 那不是要跳楼了啊
      

  6.   

    实在佩服楼主的智商,你的智商可能用Delphi确实太掉了,你应该去学机器语言,绝对不会再让你拷贝这些无聊的代码,完全用01001010去编程多爽啊!而且工具只需要一个UltraEdit就可以了,保存为EXE就行了,语法什么的都没有太多限制,只需要背下来一些指令就可以了,强烈推荐楼主去学
      

  7.   

    楼主好象连copy都没copy好,原来的safecall哪里去了?
    在指责别人之前先检查一下自己吧
      

  8.   

    你可能没有在单元里面引用type library类库,
    自已去看看,我经常用COPY这种方法,没有出错过.
      

  9.   

    上次有个说Delphi烂的人,被我整了一次,现在他正在努力用手语说话。
      

  10.   

    喂!喂!!
        楼上的哪个胖子,就说你呢?对,就是你,一看就是营养过剩,头脑简单,四肢发达,
        班门弄斧,关公面前玩大刀,你以为自己是谁呀??当年Philippe Kahn和Anders Hejlsberg
        撰写Turbo Pascal的编译器的时候你还在哪呢??人家在用计算机编程的时候你还没用过吧?靠!!
        你才用了几天呀开始对别人指指点点,虚心一点好不好,我想你这么辈子也不会写不出
        比DELPHI更好的代码!!!我们是应该有勇气对推翻旧的理论和认识,可 有勇气 不是 冒傻
        气。还有你对大家都喜欢的Borland ; Delphi  尊重一点好不好。不喜欢她你能学好她    
        吗??
     他妈的!!
        我怎么越说越气,最看不惯哪种自以为是,惟我独尊的家伙。
        自带的帮助不爽,你自己写一个呀!1你看不懂就说自己看不懂,理解不了大家也是可以原谅
        的吗?没有必要不懂装懂, 插两根葱就以为自己是大象。算了,不说了,你看着不爽我也没办法,因为你让大家先不爽的。 
        
      

  11.   

    楼主太主观了   客观的看待  DELPHI是不错的不能从很小的一个方面看
      

  12.   

    老實說,我個人還是比較喜歡用Delphi的,開發程序特快!!!
    我用VB一年就改用了Delphi!!!!!
      

  13.   

    同意 ==================== > ZyxIp(绝望中的平静)
      

  14.   

    DELPHI就是垃圾,除了让人变成“控件大师”外,还能干什么啊?
    操!什么破玩意!!!
      “速达”就是它生产的“杰作”,就它吹的什么“大型”数据库“引他背时5.6”,做出了什么啊
    徒有其表,其实狗屁!!
      

  15.   

    可以说学delphi可以学出不同的层次,其中当然包括所谓的'控件大师',不过这个大师如是写控件的大师,算我没说且表示谦意!!!
      

  16.   

    建议hbgth()先去(耐心地)拜读一下李维先生的《Borland传奇》。
    Borland有今时今日的成就,尽管有着许许多多的血汗与泪水,但毕竟还是挺过来了。以前的功与过,也已经尘埃落定。至于第三方的“制成品”,尽管使用的是Borland的开发工具,但我想其中人的因素会占得更多吧?
    PS: 我唯一的borland开发工具是TURBO C 2.0(以后或许有第二个,JBuilder 9.0 ^_^),means我并非狂热的Borland迷。以上所得,皆从一个通宵拜读《Borland传奇》中所获。
      

  17.   

    //不知道这样试试行不行
    IDBEntity = interface(IDispatch)
        ['{95F31B61-7B08-446D-B241-50E3876D18FD}']
        procedure SetField(Index: Integer; Value: OleVariant); safecall;
        function  GetField(Index: Integer): OleVariant; safecall;
      end;// *********************************************************************//
    // DispIntf:  IDBEntityDisp
    // Flags:     (4416) Dual OleAutomation Dispatchable
    // GUID:      {95F31B61-7B08-446D-B241-50E3876D18FD}
    // *********************************************************************//
      IDBEntityDisp = dispinterface
        ['{95F31B61-7B08-446D-B241-50E3876D18FD}']
        procedure SetField(Index: Integer; Value: OleVariant); dispid 1;
        function  GetField(Index: Integer): OleVariant; dispid 2;
      end;  TDBEntity = class(TAutoObject, IDBEntity)
      public
        procedure SetField(Index: Integer; Value: OleVariant); safecall;
        function GetField(Index: Integer): OleVariant; safecall;
    end;//不要乱批评Delphi, 这样的问题多半是个人的问题!
      

  18.   

    拜托,速达是C++ Builder做的做的人烂,不是工具的错
      

  19.   

    呵呵..说实在的..
    我满佩服楼主说这话的勇气的..
    呵呵..还好..我拼命克制住想CREATE用板砖拍你脑门子的念头!!
    *^_^*
      

  20.   

    《传奇》还是Delphi做的呢!
    你怎么还玩的那么欢!
    不要不会用斧子,就劈柴!
    会劈死自己的!:(