OpenDialog, wie benutzen?

[Matze]

Zitat von Haxx0r79:

Dachte mir vllt eine Goto [...]

Vergiss "goto" ganz schnell wieder. Das führt oftmals zu sehr unleserlichem Spaghetti-Code.

Delphi-Quellcode:

// im Button1OnClick o.ä.
while Edit1.Text = '' do
begin
  ShowMessage('Gibt etwas ein.');
end;

// weiterer Code (hier ist das Edit nicht leer)

Aber bitte erstelle zukünftig für jede Frage, die mit der Ausgangsfrage (OpenDialog) direkt nichts zu tun hat, ein neues Thema. Sonst geht das hier drunter und drüber.

[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!

[himitsu]

Meinst du nicht vielleicht = statt <> ?

Oder die Anweisungen im THEN/ELSE austauschen.





Und zu dem Code in #6:

Delphi-Quellcode:

while Edit1.Text = '' do
begin
  ShowMessage('Gibt etwas ein.');
end;

Ich glaub das ist eine wunderschöne Endlosschleife.

[nuclearping]

Ich glaube nach 4 1/2 Jahren hat sich das Thema wahrscheinlich schon erledigt.

[EWeiss]

Zitat von nuclearping:

Ich glaube nach 4 1/2 Jahren hat sich das Thema wahrscheinlich schon erledigt.

Scheinbar nicht
Denn wenn schon

Delphi-Quellcode:

while Edit1.Text = '' do
begin
   ShowMessage('Gibt etwas ein.');
end;

wäre ne Inputbox angebrachter.
Andernfalls JA muss ich himitsu recht geben LOL..

gruss