本文整理自网络,侵删。
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 调试ios时出现 please specify exact device preset uuid
Delphi的initialization和finalization
Delphi firedac 下的 sqlite [9] - 关于排序
Delphi 利用 showmessage(syserrormessage(getlasterror));得到不反馈的错误信息
更多相关阅读请进入《Delphi》频道 >>