Zitat von
R2009:
...
korrekt: (hier kann man den Code wenigstens lesen)
Delphi-Quellcode:
for i:=1 to Length(Str) do
begin
if str[i] in ['0'..'9'] then Include(Result, Ziffer);
else if str[i] in ['a'..'z','A'..'Z'] then Include(Result, Zeichen);
else Include(Result, Andere);
if Result = [Ziffer, Zeichen, Andere] then
break;
end;
...du sagst das kann man gut lesen, ich habe 2 mal genau hingucken müssen, was mich zu der Annahme, nein, Überzeugung bringt, auch dein Code ist nicht wirklich vernünftig formatiert
ICH würde es so machen...und jetzt vergleich mal, bei welchem Code man nur einmal gucken muss.
Delphi-Quellcode:
for i:=1 to Length(Str) do
begin
if str[i] in ['0'..'9'] then
begin
Include(Result, Ziffer);
end else
if str[i] in ['a'..'z','A'..'Z'] then
begin
Include(Result, Zeichen);
end else
begin
Include(Result, Andere);
end;
if Result = [Ziffer, Zeichen, Andere] then
begin
break;
end;
end;
Jetzt kommt die Frage, "Muss das sein bei einer Zeile einen begin end zu haben?".
Meiner Meinung nach eindeutig JA!
1. Es ist auf dem ersten Blick klar, wo ein Block anfängt und aufhört.
2. Wenn man den Code erweitert muss man nicht genau gucken wo die Erweiterung hingehört und
alles neu formatieren.
3. Der Code sieht überall gleich aus -> besser lesbar.
Code Formatierung sollte, meiner Meinung nach, konsequent sein.
IMMER!