OpenDialog, wie benutzen?

[Nedo]

eine elegante Lösung wehre auch:

Delphi-Quellcode:

 if <Editfeld>.Text = '' then begin// ist der text gleich '' (nichts)
        MessageDlg('<Text>', mtWarning,[mbOK], 0); // dann Warnung
        <Editfeld>.SetFocus; // setzt den Fokus wieder auf das Feld, es kann direkt beschrieben werden
    end else begin
        <Anweisung> // wenn etwas im Text steht dann mache (gewünschte Anweisung)
    end;

Wenn der Text des Editfeldes nicht beschrieben ist, wird eine Fehlermeldung kommen mit deinem Text!