Eine Unit in einer anderen Unit aufrufen

[Frage95]

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.

[himitsu]

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.

Delphi-Quellcode:

procedure StarteServer();
begin
  ServerClientConnect;
  ServerClientDisconnect;
end;

[Frage95]

Das waren nur Beispiel proceduren;

Ja eben genau das geht nicht ich kann nur "selbst" geschriebene proceduren in so eine sammel procedure aufrufen

[Sir Rufo]

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:

unit Tool2;

interface

procedure bar;

implementation

procedure bar;
begin
  // irgendwas machen
end;

end.

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.

[hoika]

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