Gemeinsame Uses Klausel in allen Units

[berens]

Hallo!

Ich versuche gerade bei meinem Projekt jede Komponente in eine eigene Unit zu machen. Da viele Forms dann später auf die einzelnen Komponenten zugreifen wird das später dann immer ne ziemliche Arbeit jede neue Komponente in jede Unit hinzuzufügen (weil die passende Unit wieder rauszusuchen wenn man gerade am Programmieren ist und die an die richtige (übersichtliche) Stelle bei Uses einzusetzen stört).

Gibt es also eine Möglichkeit, wie z.B. bei PHP (war das Include?) einfach an diese Stelle der Unit eine andere Datei hineinzuladen, wo z.B. alle Uses drinstehen?

Was passiert wenn dann dort eine Datei auf sich selbst verweist, wenn ihr eigener Unitname in ihrem Header steht.

Gibt's da ne ordentliche Methode?

[mkinzler]

Auzch Delphi kennt include

Delphi-Quellcode:

{$I <Dateiname> }

[berens]

Danke! Werd ich gleich mal ausprobieren.

[Angel4585]

Zitat:

Zitat von mkinzler

Auzch Delphi kennt include

Delphi-Quellcode:

{$I <Dateiname> }

was genau passiert bei diesem "Include"?
Ist das ein Ersatz für die "normale" Uses?
Was hat das für Vorteile gegenüber einer Uses?

Gibt es vllt irgendwo ein Tutorial dazu wo das erklärt ist? In der OH find ich leider nicht viel dazu.

[fkerber]

Hi!

Dieses Include bindet einfach an der Stelle, an der es steht, das ein, was in "Dateiname" steht.
Es ist also kein direkter Ersatz für die Uses, aber z.B. kann in dieser Datei dann die komplette Uses-Klausel drinstehen!


Ciao Frederic

[Angel4585]

wird das zur Laufzeit eingebunden oder vom Compiler?

[fkerber]

Hi!

Das erledigt der Compiler!


Ciao Frederic

[mkinzler]

Zitat:

was genau passiert bei diesem "Include"?

Eine andere Datei wird an Stelle von {$I..} in den Quelltext eingebunden.

Zitat:

Ist das ein Ersatz für die "normale" Uses?

Nein.

Zitat:

Was hat das für Vorteile gegenüber einer Uses?

Führt zu anderen Ergebnissen. Mit Uses kann man nurkomplette Units einbinden.

[Angel4585]

Wenn in dieser datei jetzt sowas wie

Delphi-Quellcode:

procedure Test;
begin
ShowMessage('Hello World');
end;

steht, kann ich dann diese Prozedur im Programm aufrufen?

[mkinzler]

So als wenn du sie direkt in die Unit geschrieben hättest.