![]() |
TIdTcpServer dynamisch OnExecute zuweisen....
Hallo Leudz,
ich steh aufm Schlauch........... Das ist nicht das erste mal, dass ich dynamisch Ereignisse irgendwo anhänge.... Aber anscheinend seh ich den Wald vor lauter Bäumen net....... Kann mir bitte einer nen Tipp geben?????????? (Dies wird ein Hintergrundprozess)
Delphi-Quellcode:
Compiler- Fehlermeldung: Incompatible Typs 'method pointer and regular method'
program Server;
//{$APPTYPE CONSOLE} uses SysUtils, IdTCPServer, Forms; procedure ServerExecute(AThread: TIdPeerThread); begin //todo end; var ServerSocket: TIdTCPServer; begin { TODO -oUser -cConsole Main : Insert code here } ServerSocket.Create(Application); ServerSocket.Active := True; ServerSocket.DefaultPort := 6000; ServerSocket.OnExecute := ServerExecute; //hier kommt die Fehlermeldung end. Greetziiii... Euer zwaem86 |
DP-Maintenance
Dieses Thema wurde von "Christian Seehase" von "Internet / LAN / ASP.NET" nach "Object-Pascal / Delphi-Language" verschoben.
Ein Problem mit der Sprache Delphi als solcher |
Re: TIdTcpServer dynamisch OnExecute zuweisen....
Die Procedure muss Inhalt eines Objektes sein ... z.B. könntest du die Procedure unter der public Deklaration von TForm1 deklarieren, oder aber du definierst ein neues ansonsten leeres von TObject abgeleitetes Object, welchem du die Procedure implementiertst.
|
Re: TIdTcpServer dynamisch OnExecute zuweisen....
Daaaaaaaaaaaaankeeeeeeeeeeee......................
Weiß zwar net wieso aba geht............ gruß zwaem86 |
Re: TIdTcpServer dynamisch OnExecute zuweisen....
Moin zwaem86,
und wenn Du nicht erst eine Instanz des Objektes erzeugen willst, deklarierst Du die Prozedur als Klassenmethode. (das hatten wir doch gerade erst alles :gruebel: ;-)) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:28 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz