什么垃圾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工具,变态的,自动生成的文件,我一保存,就给自动修改了。靠,一定要用工具改接口呀.
自带的帮助文件烂得要死,不爽
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工具,变态的,自动生成的文件,我一保存,就给自动修改了。靠,一定要用工具改接口呀.
自带的帮助文件烂得要死,不爽
多学些,不会用可以不用DELPHI
在指责别人之前先检查一下自己吧
自已去看看,我经常用COPY这种方法,没有出错过.
楼上的哪个胖子,就说你呢?对,就是你,一看就是营养过剩,头脑简单,四肢发达,
班门弄斧,关公面前玩大刀,你以为自己是谁呀??当年Philippe Kahn和Anders Hejlsberg
撰写Turbo Pascal的编译器的时候你还在哪呢??人家在用计算机编程的时候你还没用过吧?靠!!
你才用了几天呀开始对别人指指点点,虚心一点好不好,我想你这么辈子也不会写不出
比DELPHI更好的代码!!!我们是应该有勇气对推翻旧的理论和认识,可 有勇气 不是 冒傻
气。还有你对大家都喜欢的Borland ; Delphi 尊重一点好不好。不喜欢她你能学好她
吗??
他妈的!!
我怎么越说越气,最看不惯哪种自以为是,惟我独尊的家伙。
自带的帮助不爽,你自己写一个呀!1你看不懂就说自己看不懂,理解不了大家也是可以原谅
的吗?没有必要不懂装懂, 插两根葱就以为自己是大象。算了,不说了,你看着不爽我也没办法,因为你让大家先不爽的。
我用VB一年就改用了Delphi!!!!!
操!什么破玩意!!!
“速达”就是它生产的“杰作”,就它吹的什么“大型”数据库“引他背时5.6”,做出了什么啊
徒有其表,其实狗屁!!
Borland有今时今日的成就,尽管有着许许多多的血汗与泪水,但毕竟还是挺过来了。以前的功与过,也已经尘埃落定。至于第三方的“制成品”,尽管使用的是Borland的开发工具,但我想其中人的因素会占得更多吧?
PS: 我唯一的borland开发工具是TURBO C 2.0(以后或许有第二个,JBuilder 9.0 ^_^),means我并非狂热的Borland迷。以上所得,皆从一个通宵拜读《Borland传奇》中所获。
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, 这样的问题多半是个人的问题!
我满佩服楼主说这话的勇气的..
呵呵..还好..我拼命克制住想CREATE用板砖拍你脑门子的念头!!
*^_^*
你怎么还玩的那么欢!
不要不会用斧子,就劈柴!
会劈死自己的!:(