Warnhinweis??

[shmia]

Wenn wir schon dabei sind, sollten wir es auch richtig machen.
Wer von Euch mag Programme, die z.B. solche Fehlermeldungen ausgeben:
"keine Diskette im Laufwerk oder Datei nicht gefunden !"
Wenn schon eine Fehlermeldung, dann bitte eine ohne das Wörtchen ODER.
Ausserdem sollte man bei Fehlermeldungen eine Exception "werfen" und nicht die altmodische Technik benützen:

Delphi-Quellcode:

if (Edit1.text = '') then
begin
   Edit1.SetFocus;
   raise Exception.Create('kein Text eingegeben');  // TODO: "Text" durch passenden Begriff ersetzen
end;
if radiogroup1.itemindex = -1 then
begin
   radiogroup1.SetFocus;
   raise Exception.Create('keine Option ausgewählt');  // TODO: "Option" durch passenden Begriff ersetzen
end;