Ausgliedern von Functionen in externe Unit

[himitsu]

Zitat von Jens Hartmann:

Diese Funktionen greifen allerdings auch auf Komponenten meiner Hauptform zu.

Welche Komponenten sind das denn so alles?

z.B. die Indy zur Komunikation:
Diese würde ich dann lokal/manuell in der Unit erzeugen
und nicht die nehmen, welche auf einer Form liegen.

Bei TLabel, gäbe es 2-3 grundsätzliche Möglichkeiten

1) der Text wird in der Unit gespeichert und die Form fragt von sich aus abundzu diesen Text ab und zeigt ihn dann an.
z.B. über eine Funktion ala "GibMirDenStatusText"

2) man übergibt die Insanz zu dem Label an die Unit
z.B. bei Start des Verarbeitung
funktion LadeEMails(status: TLabel): Boolean; 3) oder man übergibt (was ich für besser halte) eine Callback-Prozedur

Delphi-Quellcode:

type TCallback = procedure(text: String) of object;
funktion LadeEMails(status: TCallback ): Boolean;

so wären die Funktionen in der externen Unit komplett von der GUI getrennt und es hängt jetzt von der GUI ab, was sie im Callback mit diesem Text macht.
Sowas kennst du vorallem von den vielen OnIrgendwas-Ereignissen der VCL.
Die Funktion/Komponente brauch nicht zu wissen, wie der Rückgabewert angezeigt/verarbeitet wird und der Programmierer hat dann alle Möglichkeiten offen


Eventuell macht es sich auch nicht schlecht, wenn du deine Prozeduren in einer Klasse kapselst.