Einzelnen Beitrag anzeigen

Benutzerbild von Leuselator
Leuselator

Registriert seit: 18. Mär 2003
Ort: Berlin
589 Beiträge
 
Delphi 8 Architect
 
#9

Re: Aus geöffnetem Formular Daten auf Elternformular ändern

  Alt 6. Jan 2004, 05:04
Also Du hast da, glaube ich, einen ziemlichen Knoten im Kopf - oder ich hab ihn .
Wie wäre es mit:
Delphi-Quellcode:
// in Formular1:
procedure TFormAdresseBearbeiten.AuswahlClick(Sender : TObject);
begin
  if FormAuswahl.ShowModal = mrOk then begin
    // reagiere auf die Auswahl...
  end;
end;

//und in Formular2:
procedure TFormAuswahl.MacheEsJetztClick(Sender : TObject);
begin
  FormAuswahl.ModalResult := mrOk;
end;

procedure TFormAuswahl.LieberDochNichtClick(Sender : TObject);
begin
  FormAuswahl.ModalResult := mrCancel;
end;
Du kannst das Formular instantiieren, ohne es anzuzeigen, kannst auf Eigenschaften des Formulares zugreifen etc und wenn der User es zu sehen bekommen soll, gehst Du wie im 1. Abschnitt oben gezeigt vor.

Gruß
Tim Leuschner
Programmierer = moderner Sysiphos: stets wenn er meint, den Stein seiner Dummheit auf den Berg des Wissens gewuchtet zu haben, erblickt er einen völlig neuen Aspekt und der Dummfels poltert mit Getöse zurück ins Tal der Unwissenheit...
  Mit Zitat antworten Zitat