Zitat von
Nuclear-Ping:
Delphi-Quellcode:
with SaveDialog1 do
begin
Filter:= 'Text-File (*.txt)|*.txt';
DefaultExt:= '*.txt';
if not Execute then
Exit;
{...}
end;
So kann man's auch machen. Da muss man keinen ganzen Block machen, nur weil 'ne Bedingung erfüllt wurde.
Naja, ob ich nun
Delphi-Quellcode:
with SaveDialog1 do
begin
Filter:= 'Text-File (*.txt)|*.txt';
DefaultExt:= '*.txt';
if not Execute then
Exit;
{...}
end;
oder
Delphi-Quellcode:
with SaveDialog1 do
begin
Filter:= 'Text-File (*.txt)|*.txt';
DefaultExt:= '*.txt';
if Execute then
{...}
end;
schreibe, spielt nun wirklich keine Geige - da spare ich bei letzterem Beispiel sogar noch das 'not' und das 'exit;' (sofern nur eine Anweisung folgt ein Reingewinn von acht Zeichen)
