Paintbox am anfang weiß ohne es gewollt zu haben

[Nicodius]

eigentlich sollte die paintboxfarbe btnface sein ... das geht aber irgendwie net...


FormCreate

Delphi-Quellcode:

  BMP:=TBitMap.Create;
  BMP.Width:=PaintBox1.Width;
  BMP.Height:=PaintBox1.Height;
 { Fonter.Style := [];
  fonter.Color := clblack;
  fonter.Size := 10;  }
  Ein := false;
 // Paintbox1.Color := Flaeche;
//  Paintbox1.Canvas.Rectangle(0,0,Paintbox1.Width, Paintbox1.Height);
  Stifter.Glyph.LoadFromFile(ExtractFilePath(ParamStr(0)) + '\Palette\Stift.bmp');
  Sprayer.Glyph.LoadFromFile(ExtractFilePath(ParamStr(0)) + '\Palette\Spray.bmp');

dann habe ich das probiert aber das geht auch nicht

Delphi-Quellcode:

  
  Paintbox1.Canvas.Pen.Color := clbtnface;
  Paintbox1.Canvas.Brush.Color := clbtnface;
  Paintbox1.Canvas.Rectangle(0,0,Paintbox1.Width, Paintbox1.Height);