Registriert seit: 7. Jun 2004
386 Beiträge
|
Re: In Kombobox zeichnen
13. Dez 2004, 17:56

Zitat von SirThornberry:
Mit GetwindowDC kann man sich das Handle zur Canvas holen, damit sollte es dann funktionieren.
(desweiteren meinst du bestimmt die " Combobox")
Etwas so:
Delphi-Quellcode:
procedure TStyle.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
var Canv: TCanvas;
begin
Canv := TCanvas.create;
Canv.handle := GetWindowDC(0);
InflateRect(Rect, -1, -1);
control.Canv.Pen.color := clRed;
control.Canv.Rectangle(Rect);
end;
Zitat:
[Fehler] abc.pas(64): Undefinierter Bezeichner: 'Canv'
[Fehler] abc.pas(65): Undefinierter Bezeichner: 'Canv'
[Fehler] abc.pas(65): Inkompatible Typen: 'HDC' und 'TRect'
[Fataler Fehler] xyz.dpr(8): Verwendete Unit abc.pas' kann nicht compiliert werden
|
|
Zitat
|