Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Zeichnen auf Canvas und ZOrder bzw. Übermalen

   
    by Bjoerk, 2. Apr 2015
  Ich will damit sagen, daß wenn man Color bzw. Style angibt, noch lange nicht sichergestellt ist, daß das auch so auf dem Canvas ankommt.
  
  Bei deiner Skizze sieht es ja so aus als ob der Kreis quasi mit bsClear gezeichnet wäre? Lass mal den Pen.Mode weg.
  
  
  procedure TBrush.SetColor(Value: TColor);
  var
  BrushData: TBrushData;
  begin
  if (Value <> Color) or ((Style = bsClear) and (Style...
• Forum: Multimedia

  AW: Zeichnen auf Canvas und ZOrder bzw. Übermalen

   
    by Bjoerk, 2. Apr 2015
  Hallo Emil, wer zuletzt malt malt zuletzt, das trifft auch für Brush.Style zu (Siehe Setter von TBrush). :wink:
  
  
  // ergibt bsClear;
  Bitmap.Canvas.Brush.Color := clInfoBK;
  Bitmap.Canvas.Brush.Style := bsClear;
  
  // ergibt bsSolid;
  Bitmap.Canvas.Brush.Style := bsClear;
  Bitmap.Canvas.Brush.Color := clInfoBK; // ***