Globale Variablen in einer anderen Form verwenden

[Picard95]

ah ok nach ein wenig weiterem tüfteln klappts jetzt.
Für die die es interressiert der veränderte Quelltext:

Delphi-Quellcode:

procedure TForm2.Button26Click(Sender: TObject);
begin
  Abkuerzung:='H';
  Form3.Trage_ein;
  Form3.showmodal;
end;

Delphi-Quellcode:

procedure TForm3.Trage_ein;
var
  Atom:string;

begin
  Atom:=unit2.Abkuerzung;
  if Atom='H'
    then
      begin

        listbox1.items.add('klappt');
      end;
end;