Was macht ihr, wenn die If-Bedingung über mehrere Zeilen geht und anschließend ein begin folgt?
Ich mach's bisher so:
Delphi-Quellcode:
if ((EineZahlDieEventuellNullSeinKoennte = 0)
not TryStrToInt(EinString + Edit1.Text[I], Dummy)) and
(StrToInt(Edit1.Text) <> '') then
begin
MachWas;
UndNochWas;
end;
Ich rück also die Zeile nach dem if ein, eventuell nachfolgende Zeilen, die Teil der Bedingung sind, bleiben auf einer Höhe mit dieser Zeile. Das Begin ist wieder auf einer Höhe mit dem if und es geht normal weiter.
Wenn mehrere Bedingungen in eine Zeile passen, schreib ich sie auch in eine.