hallo,
also mal Punkt 1 : Zuerst mal sollte man seinen Quellcode entsprechend einrücken, dann würden solche Fehler einen sofort ins Gesicht springen. Neuere Delphi-Varianten bieten mittlerweile eine automatische Codeformatierung, ich musste das früher alles noch per Fuss formatieren.
Punkt 2 : Ob ich ein Exit unbedingt in ein
begin
end;
klammern würde, kann ich nicht behaupten. Dann würde ich einfach nur das
exit;
nehmen.
Punkt 3 : Grundsätzlich würde ich immer versuchen so zu programmieren, dass ich auf ein
exit;
ganz verzichten kann. Ein
exit;
kommt einem
goto
zumindest schon sehr nahe. Ich würde also stattdessen die Logik umdrehen und dann lieber schreiben
Delphi-Quellcode:
if (CRDBGrid1.DataSource.DataSet.RecordCount > 0) then
begin
//und hier eben kein exit
mfg