Thema: Delphi In Kombobox zeichnen

Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#2

Re: In Kombobox zeichnen

  Alt 13. Dez 2004, 17:46
Dein Zeichenbereich ist auf das übergebene Rechteck beschränkt; ausserhalb darfst/kannst du nicht zeichnen.
Delphi-Quellcode:
procedure TStyle.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  InflateRect(Rect, -1, -1); // Rechteck schrumpfen
  control.Canvas.Pen.color := clRed;
  control.Canvas.Rectangle(Rect);
end;
Andreas
  Mit Zitat antworten Zitat