Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

adding an interface to a component?

Status
Not open for further replies.

edgarasm

Programmer
Joined
Oct 29, 2002
Messages
26
Location
BR
please, look down my code and see whether is possible or not to do this.

Code:
IControleServico = interface
  ['{A76DC1D9-2737-4A94-91F2-ECFF002EE82A}']
  procedure AddNovoCliente(pSession_ID:String);
end;

TListViewClient = class(TListView, IControleServico)
private
  { Private declarations }
  visitors, waitingForChat, waitingForResponse : integer;
protected
  { Protected declarations }
public
  { Public declarations }
published
  { Published declarations }
end;
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top