Thema: Delphi Daten übergabe

Einzelnen Beitrag anzeigen

Neon-chan

Registriert seit: 25. Okt 2004
24 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: Daten übergabe

  Alt 9. Mai 2006, 13:15
Gibt 2 Möglichkeiten das zu lösen:

1. schnell aber nicht so elegant: Du gibst Form2 die benötigten Werte als property (read only am besten) und liest diese propertys aus

Form 2 Eigenschaften

Code:
  TForm2 = class(TForm)
    //deine Komponenten
  private
    FListWert : string;
    procedure SetListWert(wert:string);
  public
    property ListWert read FListWert;
  end;

implementation
//
der Aufruf aus Form1

Code:

//programm davor

if Form2.showModal = mrOk than
  //Programm wartet hier bis Form2 geschlossen wird
  List.Add(Form2.ListWert);


//programm danach
Über die Eigenschaft ModalResult von TButton kannst du den Rückgabewert der Funktion SowModal bestimmen


2. eleganter aber schwerer zu programmieren wenn man es noch nicht gemacht hast: du lässt Form2 ein Event auslösen wenn die Werte eingetragen werden sollen und übergibst so die Werte


Eingebunden wird jeweils nur die Uses Form2 in Form1 nicht andersrum
  Mit Zitat antworten Zitat