Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

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

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

  Alt 14. Okt 2024, 09: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.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

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