A
answerhyh
Unregistered / Unconfirmed
GUEST, unregistred user!
我按照Delphi精要抄下来的代码,却总是出错,请指教
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
IShowString=interface(Iunknown)
procedure ShowString(S:String);
end;
TComponent1=class(TComponent, IShowString)
// protected
// procedure ShowString(S:String);virtual;
end;
以上是我的代码,TComponet1,继承了IshowSting,可是编译的时候总是报错:
[DCC Error] Unit1.pas(24): E2003 Undeclared identifier: 'ShowString'
请多指教!
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
IShowString=interface(Iunknown)
procedure ShowString(S:String);
end;
TComponent1=class(TComponent, IShowString)
// protected
// procedure ShowString(S:String);virtual;
end;
以上是我的代码,TComponet1,继承了IshowSting,可是编译的时候总是报错:
[DCC Error] Unit1.pas(24): E2003 Undeclared identifier: 'ShowString'
请多指教!