So. Nun habe ich alles was ich wissen wollte. Vielen Dank!
Delphi-Quellcode:
procedure bx_druckerDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
with cbx_drucker do
begin
Canvas.FillRect(Rect);
If Index = Printer.PrinterIndex then
Canvas.Font.Style := [fsBold] else Canvas.Font.Style := [];
Canvas.TextOut(Rect.Left, Rect.Top, Items[Index]);
end;
end
Du hast natürlich recht bezüglich der Suchfunktion! Wer suchen kann ist klar in Vorteil
