Code:
if Selecting and (SelectedIndex >= 0) then begin ... end
Das geht für mich so garnciht, weil cih so keien Breakpint auf den Teil nach then setzen kann. Daher mache ich nach jedem then eine neue Zeile. Ob dann eine begin/end block kommt hängt davon ab, ob dieser aus mehr als einer Statementzeile besteht.
Delphi-Quellcode:
if a = b then
c := a;
if a = b then
begin
c := a;
d := b;
end;
if a = b then
begin
if a = b then
begin
c := a;
d := b;
end;
end: