Einzelnen Beitrag anzeigen

Alex_ITA01

Registriert seit: 22. Sep 2003
1.115 Beiträge
 
Delphi 12 Athens
 
#1

Kompo von TPanel ableiten und mit Canvas arbeiten

  Alt 2. Mai 2005, 10:14
Hallo erstmal,
ich habe folgendes Problem. Ich habe mir eine Kompo erstellt, die vom Typ TPanel abgeleitet ist. Nun möchte ich innerhalb des Panels einfach nur ein Rechteck zeichnen...

Delphi-Quellcode:
procedure TMYPanel.Paint;
var
  R : TRect;
begin
  inherited;
  R.Left := Self.Left + 1;
  R.Top := Self.Top + 1;

  R.Right := Left + 10;
  R.Bottom := Self.Top + Self.Height;

  Canvas.Brush.Color := clBlue;
  Canvas.FillRect(R);
end;
Nur leider bekomme ich NIE dieses blaue Rechteck zu sehen... Wisst ihr was ich falsch mache?
Würde mich über jeden Tip freuen...
MFG Alex
Let's fetz sprach der Frosch und sprang in den Mixer
  Mit Zitat antworten Zitat