Variablenübergabe

[dominikkv]

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.