ShowModal schlägt fehl

[Neutral General]

Hi,

Also ich zweifle gerade an meinem Verstand. Habe eine MDIForm, die ein MDI Child erstellt. Dieses MDIChild erzeugt dann ein Formular und zeigt dieses Modal an. Aber ich bekomme dauernd Meldungen, dass ein sichtbares Fenster nicht modal gemacht werden kann...

Hier der Code aus meinem MDIChild:

Delphi-Quellcode:

procedure TDachser_FTP.VwwDBComboDlg1CustomDlg(Sender: TObject);
var tmp: TFTPOpenDialog;
begin
  tmp := TFTPOpenDialog(Self); // OMG ICH DEPP
  try
    tmp.ShowModal;
  finally
    tmp.Free;
  end;
end;

Beim TFTPOpenDialog wurde im OI Visible auf false gestellt. Es ist zur Laufzeit nach dem Create aber oft trotzdem true! Aber ich sehe das Formular auch nirgendwo...



Gruß
Neutral General

[hoika]

Hallo,


tmp := TFTPOpenDialog.Create(Self); falls jemand was ähnliches hat.


Heiko

[uligerhardt]

Zitat von Neutral General:

Delphi-Quellcode:

procedure TDachser_FTP.VwwDBComboDlg1CustomDlg(Sender: TObject);
var tmp: TFTPOpenDialog;
begin
  tmp := TFTPOpenDialog(Self); // OMG ICH DEPP
  try
    tmp.ShowModal;
  finally
    tmp.Free;
  end;
end;

Ich schreib ja lieber

Delphi-Quellcode:

var
  tmp: TFTPOpenDialog;
begin
  tmp.Create(Self); // <==
  // ...

Kommt zur Laufzeit auch gut.

[Ralf Kaiser]

Zitat von uligerhardt:

Ich schreib ja lieber

Delphi-Quellcode:

var
  tmp: TFTPOpenDialog;
begin
  tmp.Create(Self); // <==
  // ...

Kommt zur Laufzeit auch gut.

Und ich schreibe lieber:

Delphi-Quellcode:

var
  tmp: TFTPOpenDialog;
begin
  tmp := TFTPOpenDialog.Create(Self); // <== Zuweisung!!!!
  // ...

Kommt noch besser...

[sirius]

Zitat von Alfi001:

Kommt noch besser...

Wieso Da erscheint doch nicht einmal eine Fehlermeldung

[Ralf Kaiser]

Zitat von sirius:

Wieso Da erscheint doch nicht einmal eine Fehlermeldung

Dann verrat mir mal, wie du einen so erzeugten Dialog wieder freigeben willst oder überhaupt darauf zugreifen willst. Du hast ja keine Variable der das Ergebnis des "Create" zugewiesen wurde...

Es erschein bei deiner Version nicht nur keine Fehlermeldung, es erscheint auch kein Dialog

[sirius]

@Alfi:
Du hast schon gesehen, dass es bei Ulis Beitrag schon längst nicht mehr um die Lösung ging (alle hier im Thread beteiligten kennen die ja), sondern eher um: "Wie erzeuge ich mir ständig einen bekloppten Fehler, obwohl ich es besser weis?"

[Ralf Kaiser]

Natürlich habe ich das gesehen. Allerdings ist deine Version der Dialogerzeugung auch ein ziemlich beliebter Fehler der von vielen in der Anfangszeit gemacht wird.

Wenn dein Beitrag als ironische Ergänzung gedacht war dann habe ich wohl dein Smiley falsch interpretiert...