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);

[Muetze1]

Moin!

Die PaintBox "behält" ihren Inhalt nicht automatisch wie ein TImage, sondern muss bei jedem malen auch wieder mit ihren darzustellenden Inhalt "gefüttert" werden. Dazu hat sie das Ereignis "OnPaint", wodrinne du den Inhalt malen kannst. Wenn du dort die PaintBox mit der Farbe füllst bzw. malst, dann sollte das auch gut zu sehen sein.

MfG
Muetze1

[Nicodius]

THX!!

[nailor]

falls du nicht nur stupide füllst, ist es jenachdem praktisch im ONPaint nicht zu rechnen, sondern einen puffer einfach in die paintbox zu kopieren!

[Nicodius]

werde ich beachten