Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: IdTCPServer zur Laufzeit erstellen..

  Alt 2. Jan 2007, 06:55
Guten Morgen,

weil deine Prozedur SetPort() keine Methode der Form TForm1 ist, musst du den event handler mit seinem qualifizierten Namen zuweisen:

Delphi-Quellcode:
procedure SetPort(Port: Integer);
begin
  TCPServer[1] := TIdTCPServer.Create(nil);
  TCPServer[1].DefaultPort := Port;
  TCPServer[1].OnExecute := Form1.ServerExecute;
end;
Alternativ kannst du die Prozedur SetPort() auch zu einer Methode der Form machen.

Neujahrsgrüße vom marabu
  Mit Zitat antworten Zitat