Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**himitsu**

Schreib mal ins OnPaint der PaintBoxen

Delphi-Quellcode:

			procedure TForm6.PaintBox1Paint(Sender: TObject);

begin

  TPaintBox(Sender).Canvas.TextOut(0, 0, TPaintBox(Sender).Name);

end;

Kanst auch beiden Boxen das selbe Ereignis zuweisen.

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.184 Beiträge Delphi 12 Athens	#2 AW: Delphi verwechselt Paintboxen ? 21. Dez 2011, 16:19 Schreib mal ins OnPaint der PaintBoxen markieren Delphi-Quellcode: procedure TForm6.PaintBox1Paint(Sender: TObject); begin TPaintBox(Sender).Canvas.TextOut(0, 0, TPaintBox(Sender).Name); end; Kanst auch beiden Boxen das selbe Ereignis zuweisen. $2B or not $2B
	Zitat