Einzelnen Beitrag anzeigen

andreash

Registriert seit: 22. Jun 2006
Ort: Dörverden
60 Beiträge
 
Delphi 7 Professional
 
#3

Re: if-Abfrage vereinfachen

  Alt 10. Apr 2007, 13:39
Wie wäre es damit
Delphi-Quellcode:
if Show then
    FImageEnVect.Bitmap.Canvas.Pen.Mode := pmBlack
  else
    FImageEnVect.Bitmap.Canvas.Pen.Mode := pmNotXor;
Edit: Semikolon gelöscht
Andreas
Der Optimist glaubt, wir leben in der besten aller möglichen Welten. Der Pessimist befürchtet, daß das stimmt.
  Mit Zitat antworten Zitat