Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#14

Re: if-Abfrage vereinfachen

  Alt 10. Apr 2007, 15:16
Moin Michael,

also ich würde die "Abfrage" so machen:

Delphi-Quellcode:
const
  _aPenMode : array [boolean] of TPenMode = (pmNotXor,pmBlack);

FImageEnVect.Bitmap.Canvas.Pen.Mode := _aPenMode[FShow];
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat