Variable in aufgerufene Form zurückgeben

[Walter Landwehr]

Danke an alle, habe es jetzt so gelöst.

Delphi-Quellcode:

frmDatum := TfrmDatum.Create(nil);
    frmDatum.ShowModal;
    NewDate := frmDatum.cxDateNavigator1.Date;

[haentschman]

Moin...

Zitat:

PatientenblattFrm.NewDate := cxDateNavigator1.Date;

imho ist das unglücklich. Normalerweise kennt nur der Aufrufer das aufzurufende Form und nicht die aufrufende Form den Aufrufer. Wenn du deine Datumsform mehrfach verwendest, dann hättest du haufenweise Referenzen in den Uses und zirkuläre noch dazu.

Delphi-Quellcode:

frmDatum := TfrmDatum.Create(nil);
frmDatum.ShowModal;
NewDate := frmDatum.cxDateNavigator1.Date;

...das ist genau das was ich meinte. frmDatum ist es wurscht wohin das Ergebnis geht.

Nachtrag (besser):

Delphi-Quellcode:

frmDatum := TfrmDatum.Create(nil);
try
  frmDatum.ShowModal;
  NewDate := frmDatum.cxDateNavigator1.Date;
finally
  frmDatum.Free;
end;

[Luckie]

http://michael-puff.de/Programmierun...tauschen.shtml

[TigerLilly]

TPatientenblattFrm klingt nach dem Typ und nicht nach einer Variablen, die Nil sein könnte.

Wahrscheinlich hast du die globale Variable, Delphi anlegt, im Code gelassen, nutzt sie aber nicht, um die Form zu erzeugen.