Groß/Kleinschreibung von VAR, BEGIN, end,etc

[alfware17]

Ich sehe die Blöcke am besten so

Code: Alles auswählen

if A < B then begin
  DoSomething;
  DoSomethingElse;
end
else begin
  DoThis;
  DoThat;
end;  

Bei mir sucht das Auge nach dem IF dann nach einem ELSE am ANfang des nächsten Blocks.
Wie gesagt, ist Sache des Programmieres und jeder sieht was anderes.

Ich verstehe konkret am Delphi-Style nicht, was an

Code: Alles auswählen

if A < B then begin
  DoSomething;
  DoSomethingElse;
end;

oder

Code: Alles auswählen

while A < B do begin
  DoSomething;
  DoSomethingElse;
end;  

so Falsch sein soll - OK im letzten Jahrhundert habe ich die Schlüsselworte alle noch groß geschrieben, dazu bin ich momentan auch zu faul geworden, vielleicht am Projektende dann mal eine Säuberungs- und Umbenenn-Aktion.

Spannend finde ich immer verschachtelte Sachen, wie

Code: Alles auswählen

if A < B then begin
  DoSomething;
  DoSomethingElse;
end
else begin
  if A = B 
    then DoThis
    else begin
      if C = D 
        then begin
          DoThat1;
          DoMore;
        end  
        else begin
          repeat
            inc(x); 
            CallMe(x);
          until X > Y;
        end;
    end:
end;  

wobei ich dann am liebsten die end unter dem then bzw else suche und nicht wie in den Beispielen unter dem begin der Extrazeile.

Was groß und klein angeht - habe ich es aufgegeben. So viele Jahrzehnte, so viele verschiedene Sprachen, so viele Stile usw. - ich fuhr immer am besten damit,
mich dem Stil meines Vorgängers anzupassen, auch wenn man dann eben 6x am Tag anders schreibt wenn man 6 Vorgängerprogramme erwischt.
Nun sind ja manche Sprachen extrem pingelig, was Groß/Kleinschreibung usw angeht - ich weiß nicht was besser ist, wenn wie in Pascal so viele Freiheiten da sind oder wie
wenn mich in Python und Java die IDE fast schon dazu zwingen, bestimmte Schreibungen einzuhalten

[Joh]

Aus dem obigen Code mache ich, in Anlehnung an case folgendes:

Code: Alles auswählen

if A < B then 
begin
  DoSomething;
  DoSomethingElse;
end
else if A = B then 
  DoThis
else if C = D then
begin
  DoThat1;
  DoMore;
end  
else 
begin
  repeat
    inc(x); 
    CallMe(x);
  until X > Y;
end;  

Das ist für mich übersichtlicher, als die korrekte Einrückung der else(n)...
Und zeigt mir die Gleichwertigkeit der Abfragen besser.

Unter Foxpro schrieb ich sonst so schön:

Code: Alles auswählen

DO CASE
  CASE a=1
    ...
  CASE b='Test'
    ...
  OTHERWISE
    ...
ENDCASE

[alfware17]

naja, das mit dem CASE war jetzt Zufall - weil ich ungewollt eine Tiefe produziert habe, mit meinem Beispiel unten geht das nicht mehr so leicht.

Aber danke für die Erinnerung, ich war auch ein Fan von dBase Case & Co. Und ich habe mich in C/Java & Konsorten regelmäßig ins Off manövriert weil ich Breaks ignoriert habe.

Code: Alles auswählen

IF a < b THEN BEGIN
  DoSomething;
  DoSomethingElse;
END
ELSE BEGIN
  IF a = b 
    THEN BEGIN
      IF e > f
        THEN BEGIN
          DoThat2;
          DoMore2;
        END
        ELSE
          DoThis 
    END
    ELSE BEGIN
      IF c = d 
        THEN BEGIN
          DoThat1;
          DoMore1;
        END
        ELSE BEGIN
          REPEAT
            INC(x); 
            CallMe(x);
          UNTIL x > y;
        END;
    END:
END;  

Und: dies ist ein konstruiertes Beispiel. Spätestens wenn noch ein paar mehr begin/end ins Spiel kommen, strukturiere ich auch anderes, mit PROC. Mir geht es aber auch um die nun groß geschriebenen Schlüsselwörter, die ich aus Gewohnheit am Ende per find/replace produziere...