这是无法解决的，可以在checkboxes里设置Image,或者在checkboxes后面画SubImages

本来我想自己做两个Checked图片，一个选中，一个不选中，这样就可以不用CheckBoxes=True了。
但这样发现不美观，当选中一行时，它将那两个图片也选中了，非常不美观。
而用CheckBoxes=True时，就不存在问题，当选中一行时，选中行的显示效果不涉及CheckBox区域，所以显得比较美观。

不知各位还有没有什么高见

有高手知道吗？

我知道原因了，研究了之后我发现这是Borland的一个Bug，大家看如下VCL代码：
procedure TCustomListView.ResetExStyles;
var
  Styles: DWORD;
  TempImages: TCustomImageList;
begin
  if HandleAllocated then
  begin
    TempImages := nil;
    if StateImages <> nil then
    begin
      TempImages := StateImages;
      StateImages := nil;
    end;
    Styles := LVS_EX_SUBITEMIMAGES or LVS_EX_INFOTIP;
    if FCheckboxes then Styles := LVS_EX_CHECKBOXES;   

    //上面这条语句明显的错误，就是因为它导致SubImages无法显示
    //得改成Styles :=Styles or LVS_EX_CHECKBOXES;


    if FGridLines then Styles := Styles or LVS_EX_GRIDLINES;
    if FHotTrack then Styles := Styles or LVS_EX_TRACKSELECT;
    if FRowSelect then Styles := Styles or LVS_EX_FULLROWSELECT;
    if FFlatScrollBars then Styles := Styles or LVS_EX_FLATSB;
    if FFullDrag then Styles := Styles or LVS_EX_HEADERDRAGDROP;
    if FShowWorkAreas then Styles := Styles or LVS_EX_MULTIWORKAREAS; 
    if htHandPoint in FHotTrackStyles then
      Styles := Styles or LVS_EX_ONECLICKACTIVATE
    else if FHotTrackStyles * [htUnderlineHot, htUnderlineCold] <> [] then
      Styles := Styles or LVS_EX_TWOCLICKACTIVATE;
    if htUnderlineHot in FHotTrackStyles then
      Styles := Styles or LVS_EX_UNDERLINEHOT;
    if htUnderlineCold in FHotTrackStyles then
      Styles := Styles or LVS_EX_UNDERLINECOLD;
    ListView_SetExtendedListViewStyle(Handle, Styles);
    if TempImages <> nil then
      StateImages := TempImages;
  end;
end;

不是Bug，即使改成Styles :=Styles or LVS_EX_CHECKBOXES;编译后也一样不能～～

可以把的宽度设置成多一些放两个图StateImages.Width := 32 + 2;

不会吧，你有4颗星了，怎么还搞错啊
我实践成功之后才发上来的的啊，我写了一个函数
procedure DisplayCheckBoxedAndSubImages(AListView:TListView);
var
  Styles:DWORD;
begin
  Styles:=ListView_GetExtendedListViewStyle(AListView.Handle );
  Styles:=Styles or LVS_EX_CHECKBOXES or  LVS_EX_SUBITEMIMAGES or LVS_EX_INFOTIP;
  ListView_SetExtendedListViewStyle(AListView.Handle,Styles);
end;
如果要同时显示CheckBoxes和SubImages，先调用一下上面的函数，就解决问题了。

你的这个建议我去试试，看行不行。