@turboPASCAL und alle mit If then Einrückung.
ich habe da noch eine Variante, die nicht genannt wurde...
Delphi-Quellcode:
// <- Immer vor einem if eine leerzeile
if ... then
begin
end;
// <- Immer vor einem if eine leerzeile
if ... // immer wenn die if einen else-teil hat, kommt das then drunter!
then begin
end
else begin
end;
Somit kann ich am if schon erkennen, ob ein else vorhanden ist. (War früher noch wichtiger als heute, da
die Monitore "nur" 25 Zeilen hatten und i.d.R. nicht die ganze If auf den Bildschirm gepasst hat.
Delphi-Quellcode:
// oder die Kurzform
if ... then
X := 43
// oder mit else
if X=43
then DeepThought := true
else DeepThought := false;
// oder
DeepThought := boolean(X=43) // :-)
// Ach ja und noch etwas
if DeepThought then
begin
for i:=0 to Guide.lines.count-1 do
begin
...
end;
// vor einer schleife immer eine Leerzeile
while i < Guide.lines.count-1 od
begin
...
end
repeat
...
until not(Earth);
// und vor einer case immer eine Leerzeile
Case Typeofrules of
1 : begin
end;
2 : begin
end;
end; // of case
// ^^^^^^^^^^ immer diesem Kommentar, weil einziges end ohne begin...
end;
Frank
