Variablen von Form1 zu Form2 übertragen

[MrMyagi]

Moin,
wie ist es möglich zb eine Variable von Form 1 auf Form 2
zu übergeben/übertragen ?

mfG, Nico

[DeddyH]

Was meinst Du damit?

[MrMyagi]

Ich habe jetzt verschiedene Eingabe in Form 1 gemacht zb
Wohnort etc diese habe ich dann in einer Variablen gespeichert.
Diese möchte ich jetzt jedoch auch in Form 2 benutzen können.




mfG, Nico

[DeddyH]

Definiere sie doch als Property von Form1, das ist IMHO die sauberste Lösung.

[hoika]

Hallo,

nimm eine 3. unit.
Packe dort deine Variablen (Records, Klassen) rein
in den interface-Teil
und binde diese "Data"-Unit in beide Form-Units ein.


Heiko

[MrMyagi]

Habt ihr vielleicht nen konkretes Beispiel, wie
soetwas aussehen könnte?

Aber danke erstmal für die vielen Antworten.

[DeddyH]

Delphi-Quellcode:

type TMainForm = class(TForm)
  ...
  private
    { Private-Deklarationen }
    FEinWert: integer;
  public
    { Public-Deklarationen }
    property EinWert: integer read FEinWert; //ReadOnly-Property kann von außen nicht geändert werden
  end;

Abfragen kannst Du dann mit MainForm.EinWert

[MrMyagi]

Danke, werde es sofort einmal ausprobieren


mfG, Nico

[MrMyagi]

Hab das jetzt mal ausprobiert, leider taucht
dort noch ein Fehler aus (welcher wahrscheinlich von meinem
Unverständnis kommt )

Delphi-Quellcode:

 private
    { Private-Deklarationen }
    FAdresseAbfahrt, FPlzAbfahrt, FStadtAbfahrt, FAdresseAnkunft, FPlzAnkunft, FStadtAnkunft : String;
  public
    { Public-Deklarationen }
    property AdresseAbfahrt, PlzAbfahrt, StadtAbfahrt, AdresseAnkunft, PlzAnkunft, StadtAnkunft : String read FAdresseAbfahrt, FPlzAbfahrt, FStadtAbfahrt, FAdresseAnkunft, FPlzAnkunft, FStadtAnkunft;
  end;

Fehler:
[Fehler] Routenplaner1.pas(32): Eigenschaft 'AdresseAbfahrt' existiert nicht in Basisklasse
[Fehler] Routenplaner1.pas(32): Ungültige Compileranweisung: 'read'
[Fehler] Routenplaner1.pas(32): Bezeichner redefiniert: 'FPlzAbfahrt'
...
[Fehler] Routenplaner1.pas(32): Bezeichner redefiniert: 'FStadtAnkunft'
usw

mfG, Nico

[DeddyH]

Auch wenn es mehr Tipparbeit ist, Du musst die Properties schon einzeln definieren.

Delphi-Quellcode:

property AdresseAbfahrt: string read FAdresseAbfahrt;
property PlzAbfahrt: string read FPlzAbfahrt;
...