Thema: Delphi Was passiert denn da?

Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#2

AW: Was passiert denn da?

  Alt 12. Aug 2016, 12:25
Code:
Memo.Flags := (Memo.Flags and not flWordWrap) or Word(Boolean(ckbWordWrap.Checked)) * flWordWrap;
das ist so ein Konstrukt für das man C so mag.
Code:
(Memo.Flags and not flWordWrap) = Memo.Flags or 111111101 = alle Bits sind gesetzt bis auf das zweite, das ist oder nicht

 Word(Boolean(ckbWordWrap.Checked)) * flWordWrap = 0 oder 2 {2=flchecked}
also setzt diese Zeile das zweite Bit abhängig davon ob ckbWord.Checked true ist.
und alle anderen Bits sind auch gesetzt.
(Mann hoffentlich hab ich mich nicht verlaufen)

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat