Delphi-Version: XE2
Eine Unit in einer anderen Unit aufrufen
Hey, ich programmiere gerade ein bisschen an einem Chat.
Läuft alles soweit gut nur jetzt bin ich gerade dabei mein Programm etwas weiterzuentwickeln. Ich würde gerne wissen ob es möglich ist alle proceduren in einer zusammenzufassen und diese Prozedure sprich (den kompletten Ablauf der ganzen Unit) in einer anderen Unit wiederzugeben. Beispiel: Unit1 procedure ServerClientConnect (); procedure ServerClientDisconnect(); etc.. in einer zusammenfassenden procedure aufrufen procedure Unit1 (); ServerClientConnect; ServerClientDisconnect; etc.. Unit2 procedure StarteServer(); begin Unit1(); end; Würde mich sehr über schnelle Antworten freuen. |
AW: Eine Unit in einer anderen Unit aufrufen
Nein, das geht nicht.
Nja, außer man sucht sich über die RTTI diese Funktionen zusammen und ruft sie darüber auf. Aber was soll "StarteServer" dann machen? Es ruft Connect und gleich danach Disconnect, was ja irgendwie nicht viel Sinn macht. Du kannst dir aber natürlich selber eine Sammelfunktion schreiben, worin du alle gefünschten Funktionen manuell aufrufst. :angle2:
Delphi-Quellcode:
procedure StarteServer();
begin ServerClientConnect; ServerClientDisconnect; end; |
AW: Eine Unit in einer anderen Unit aufrufen
Das waren nur Beispiel proceduren;
Ja eben genau das geht nicht ich kann nur "selbst" geschriebene proceduren in so eine sammel procedure aufrufen |
AW: Eine Unit in einer anderen Unit aufrufen
Irgendwie habe ich das Gefühl, man redet aneinander vorbei ...
Wenn du nur "selbst" geschriebene Prozeduren aufrufen kannst, dann wirst du wohl keine anderen Units eingebunden haben.
Delphi-Quellcode:
unit Tool1;
interface procedure foo; implementation uses Tool2; procedure foo; begin bar; // Aufruf der procedure bar aus der unit Tool2 end; end.
Delphi-Quellcode:
Also versuche das bitte nochmals zu beschreiben was du wirklich willst und versuche originalen Code zu posten wo zu sehen ist, was da nicht funktioniert.
unit Tool2;
interface procedure bar; implementation procedure bar; begin // irgendwas machen end; end. |
AW: Eine Unit in einer anderen Unit aufrufen
Hallo,
die Prozeduren einer Unit sind nicht "ein Ablauf". Sollen alle Procs einer Unit hintereinander aufgerufen werden, schreibe eine Sammel-Proc und rufe diese dann auf. Heiko |
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:08 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz