Variable aus anderer Unit kann nicht richtig ausgelesen werd

[JBJHJM]

Tut mir ja Leid, aber alle schon bestehenden Themen haben mir nicht weitergeholfen.

Ziel: Ich will auf eine Variable einer anderen Unit zugreifen, der Einfachheit halber erstmal mit showmessage(Form1.variable).
Problem: Der genannte Befehl erzeugt einfach nur eine leere Meldung.

Die auszulesende Variable hat bereits einen Wert erhalten, im Editor wird kein Verbindungsproblem gezeigt, also die Variable scheint korrekt deklariert zu sein. Eine Fehlermeldung kommt auch nicht, weder beim compilieren, noch beim ausführen des Befehls.

Was habe ich übersehen?!?


ERGÄNZUNG:
Habe es bis jetzt nur mit Strings ausprobiert. Jetzt auch mit Integer, zeigt einfach nur 0 an.
Also scheinen die Strings geleert zu werden. Wie kann ich bestimmen, dass diese bis zum schließen des Programms dauerhaft zugewiesen bleiben, statt geleert zu werden.

[Die Muhkuh]

Zitat:

Zitat von JBJHJM

Was habe ich übersehen?!?

Uns den Code zu zeigen ;)

[Bernhard Geyer]

Zitat:

Zitat von JBJHJM

Ziel: Ich will auf eine Variable einer anderen Unit zugreifen, der Einfachheit halber erstmal mit showmessage(Form1.variable).
Problem: Der genannte Befehl erzeugt einfach nur eine leere Meldung.

Bist du sicher das dein Formular auf das du zugreifen willst wirklich hinter der Variable "Form1" steckt?

[Sharky]

Zitat:

Zitat von JBJHJM

...Was habe ich übersehen?!? ...

Deinem Thread eine aussagekräftigen Titel zu geben der etwas mit der Frage zu tun hat ;-)

Bitte - Danke

[jaenicke]

Jedenfalls lass die globalen Variablen am besten weg und nimm den normalen Weg über Eigenschaften oder Felder der Formulare, dann gibt es da auch keine Probleme.

[Popov]

Zuerst die zweite Unit mit der globalen Variable. Der einfachheitshalber habe ich sie bereits in der initialization (also beim Programmstart) zugewiesen. Du kannst es auch anders machen.

Delphi-Quellcode:

unit Unit2;

interface

var
  GlobaleVariable: String;

implementation

initialization
  GlobaleVariable := 'Hallo Welt!';

end.

Wichtig in Unit2: die globale Variable muß im interface-Teil deklariert sein, nicht in implementation.

Nun die Unit1:

Delphi-Quellcode:

implementation

{$R *.dfm}

uses
  Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(GlobaleVariable);
end;

Nicht vergessen die Unit2 unter uses einzutragen.

Natürlich kannst du auch aus Unit1 einen Wert zuweisen:

Delphi-Quellcode:

implementation

{$R *.dfm}

uses
  Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(GlobaleVariable);

  GlobaleVariable := 'Nun die Fortsetzung: Hallo Welt 2.0!';

  ShowMessage(GlobaleVariable);  
end;

[Die Muhkuh]

Zitat:

Zitat von jaenicke

Jedenfalls lass die globalen Variablen am besten weg und nimm den normalen Weg über Eigenschaften oder Felder der Formulare, dann gibt es da auch keine Probleme.

Wenn Du richtig gelesen hättest, versucht er mit Form1.Variable drauf zu zu greifen, also scheint es sich nicht um eine globale Variable im klassischen Sinn zu halten.

[jaenicke]

Das habe ich für einen Schreibfehler gehalten, wenn er globale Variable sagt. ;-)

[DeddyH]

Ohne Codeschnippsel tappen wir hier nur im Dunkeln :glaskugel:

[R2009]

Hi,

wieder einmal! Zum xten Mal:
Es gibt unter Delphi keine "globalen Variablen". Es gibt nur "Unit-globale" Variablen.
Das fatale daran ist: Der Variablenname kann in einer anderen Unit nochmal vorkommen.
Es hängt dann nur von der Reihenfolge in der Uses Zeile ab welche Variable du wo erreichst.
Also FINGER WEG!
Besser ist es eine Variable in eine Klasse zu verpacken!

Beispiel:

Delphi-Quellcode:

Unit1
Interface
var1:integer;

Unit2
Interface
var1:integer;

Unit3
uses unit1,unit2;

var1 kriegst du jetzt von unit1

Unit3
uses unit2,unit1;

var1 kriegst du jetzt von unit2

Viele Grüsse