本文整理自网络,侵删。
uses CommCtrl;
ListView1.Brush.Bitmap:=MyImage.Picture.Bitmap;
ListView1.Brush.Bitmap.Transparent:=true;
SetBkMode(ListView1.Canvas.Handle, TRANSPARENT);
ListView1.Perform(LVM_SETTEXTBKCOLOR,0,LongInt(CLR_NONE));
ListView_SetBKColor(ListView1.Handle, CLR_NONE);
相关阅读 >>
Delphi 结束360safe和360保险箱进程 for Delphi
Delphi学习sql语句 - insert、update、delete
更多相关阅读请进入《Delphi》频道 >>