Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: if-Abfrage vereinfachen

   
    by Luckie, 10. Apr 2007
  Wenn TPen.Mode keinen Einfluss auf SetPixel hat, warum werden sie dann einmal gemalt und einmal nicht?
  
  Sinn ist der: Ich habe ein Grid zum Ausrichten von Objekten. Dieses soll man anzeigen und nicht nazeigen können. Wenn es angezeigt wird, muss ich es eben entsprechend übermalen, um es wieder verschwiden zu lassen. Dabei kann der Hintergrund jede beliebige Frabe an jeder beliebigen Stelle...
• Forum: Object-Pascal / Delphi-Language

  Re: if-Abfrage vereinfachen

   
    by Luckie, 10. Apr 2007
  Ok, hier mal die die vollständige Routine:
  procedure TDWFotoBook.PaintGrid(Show: Boolean = True);
  
  procedure DrawDots;
  var
  i : Integer;
  j : Integer;
  begin
  with FImageEnVect do
  begin
• Forum: Object-Pascal / Delphi-Language

  Re: if-Abfrage vereinfachen

   
    by Luckie, 10. Apr 2007
  So hatte ich es vorher auch, aber das hat irgendwie nicht das gemacht, was es sollte. Werde ich dann wohl noch mal probieren. :gruebel:
• Forum: Object-Pascal / Delphi-Language

  if-Abfrage vereinfachen

   
    by Luckie, 10. Apr 2007
  Ich habe hier eine ziemlich grausame if-Abfrage. Kann man die eventuell vereinfachen?
  if (Show and not FShowGrid) or (Show and FShowGrid) then
  begin
  FImageEnVect.Bitmap.Canvas.Pen.Mode := pmBlack;
  end
  else if (FShowGrid and not Show) or (not FShowGrid and not Show) then
  begin
  FImageEnVect.Bitmap.Canvas.Pen.Mode := pmNotXor;
  end;