Hallo wiedermal,
ich zermartere mir schon den Schädel, ich möchte ein Bild das ich aus einer Resource hole in ein Image laden und dieses dann als Hintergrundbild in eine ListView zeichnen.
Soweit klappt das ja auch, nur wird das Bild nicht auf der ganzen Größe des ListView angezeigt, sondern nur auf einen kleinen teil davon(ein Bild davon ist Up)
Mit diesem Code zeichne ich das Bild auf das ListView
Delphi-Quellcode:
procedure TForm1.listview1CustomDraw(Sender: TCustomListView;
const ARect: TRect;
var DefaultDraw: Boolean);
begin
with Sender
do
begin
Canvas.StretchDraw(ARect, Image2.Picture.Bitmap);
SetBkMode(Canvas.Handle, TRANSPARENT);
ListView_SetTextBkColor(
Handle, CLR_NONE);
ListView_SetBKColor(
Handle, CLR_NONE);
end;
end;
Gibt es da irgend eine Lösung?