Dass man nach einem If das end und else jeweils in eine Zeile packen soll, finde ich aber auch nicht so gut.
ich mache es auch eher so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
-if a = b then
--begin
---// etwas machen
--end else
---begin
----// etwas machen
---end;
end;