Delphi-Quellcode:
unit Meine_ERSTE_Unit;
interface
type
TForm1 =
class(TForm)
private
Mein_privates_Feld:
String;
// Hier kann man nicht von außen zugreifen
public
Mein_öffentliches_Feld:
String;
// Hier schon
property Feld:
String read Mein_privates_Feld
write Mein_privates_Feld;
// Mit dem hier greife ich dann doch auf das erste Feld zu
end;
var
Form1: TForm1;
Globale_Variable:
String;
// einfach eine globale Variable
implementation
// Nur wenn du auch auf Meine_ZWEITE_Unit zugreifen willst:
uses
Meine_ZWEITE_Unit;
// usw
Delphi-Quellcode:
unit Meine_ZWEITE_Unit;
interface
// blablabla
implementation
uses
Meine_ERSTE_Unit;
// jetzt kennt diese Unit unsere erste Unit
procedure WasWeisIch;
begin
showmessage(Globale_Variable);
showmessage(Form1.Mein_öffentliches_Feld);
showmessage(Form1.Feld);
end;
Der Ort wo uses mit der
Unit steht entscheidet auch wo du diese
Unit nutzen kannst.
Wenn du zB die
Unit unter interface bekannt gibst iste diese in der ganzen
Unit zu sehen, wenn due
Unit im Implemantation-Bereich steht kannst du auch nur im Implementation-Bereich darauf zugreifen.
Es dürfen aber nicht beide
Unit jeweils in der anderen
Unit im Interface stehen, da es sonst eine Zirkuläre
Unit-Referenz gibt.