Parameter an Formular übergeben

[himitsu]

http://www.FrankNStein.de/Smiley-Wolke.gif Hallöle,

Delphi-Quellcode:

TForm2 = Class(TForm)
    Button1Click(Sender: TObject);
    ...
  Public
    S: String;
    I: Integer;
    {Prozeduren ...}
  End;

Procedure TForm2.Button1Click(Sender: TObject);
  Begin
    Caption := S;
  End;

Delphi-Quellcode:

Var Form2: TForm2;

Form2 := TFormVVE.Create(Application);
Form2.S := 'Test';
Form2.I := 123;

http://www.FrankNStein.de/Smiley-Kuss.gif * * http://www.FrankNStein.de/Smiley-Spinne.gif * * * http://www.FrankNStein.de/Smiley-Winken.gif