Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.062 Beiträge
 
Delphi 12 Athens
 
#39

AW: EMB DCE 12 - Bedingungen mit einen Assign-Zeichnen

  Alt 14. Okt 2024, 10:59
Außer man ist ein Klammer-Fan so wie ich, und nutze Klammern gerne in Mathematik und Code um Teile zu separieren,
Das geht ja noch ... wir haben hier ein paar Klammer-Fetischisten, die klammern ALLES und JEDEN, sogar einzelne Variablen,
schreiben NOT wie eine Funktion (mit Klammer und ohne Leerzeichen) und nochmal 'ne Klammer drumrum und boar eh.

Code:
if   (Assign(      (FClass))) )
   and      (      (not(FClass.CanNotUse)) )
   and      ( (    (FClass.ValueA)
               + ( (FClass.ValueB) * (FClass.ValueC) )
              )  = 42
            ) then
  begin
  end;

Ach ja, AND, OR und + am Zeilenende
Code:
if (Assign(      (FClass))) ) and
          (      (not(FClass.CanNotUse)) ) and
          ( (    (FClass.ValueA) +
               ( (FClass.ValueB) * 
                 (FClass.ValueC) )
            )  = 42
         ) then
Vorne ist es immer an der selben Stelle und als Erstes (nicht sonstwo im Text hinten versteckt) ... man sieht also (nicht), dass es und wie an der vorhergehenden Zeile hängt.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (14. Okt 2024 um 11:09 Uhr)
  Mit Zitat antworten Zitat