如何给LISTVIEW加一个图片背景？

Question

如何给LISTVIEW加一个图片背景？我希望能够使界面漂亮一些。

Answer 1

自已画，Delphi自带的一个例子写得很明白,可以照着写
在Demos\VirtualListView\VirtualListView

Answer 2

以前有个给button加上canvas的贴，可以搜索下

Answer 3

http://www.vbzx.net/ArticleView/vbzx_Article_View_626.asp

Answer 4

uses CommCtrl;procedure TForm1.ListView1CustomDraw(Sender: TCustomListView;
  const ARect: TRect; var DefaultDraw: Boolean);
begin
  TListView(Sender).Canvas.Draw(0, 0, Image1.Picture.Graphic);  SetBkMode(TListView(Sender).Canvas.Handle, TRANSPARENT);
  TListView(Sender).Perform(LVM_SETTEXTBKCOLOR, 0, LongInt(CLR_NONE));
  ListView_SetBKColor(TListView(Sender).Handle, CLR_NONE);
end;

Answer 5

var
  b : TBitmap;
begin
  b := TBitmap.Create;
  b.LoadFromFile('D:\My Documents\My Pictures\kj015.bmp');
  ListView1.Canvas.Draw(0,0,b);
end;