Listview中添加ComboBox控件(100分)

  • 主题发起人 主题发起人 snail1024
  • 开始时间 开始时间
S

snail1024

Unregistered / Unconfirmed
GUEST, unregistred user!
想往Listview控件中的某列添加ComboBox控件,那位有代码呀,共享下,谢谢!
 
你可以用一下advStringGrid这个第三方控件,功能比较强大,里面有你想要的功能
 
有一段stringgrid中增加checkbox控件的代码,你可以参考一下:
var
i: integer;
chk: TCheckBox;
rt: TRect;
begin
for i := 1 to stringgride.RowCount - 1do
begin
chk := TCheckBox.Create(Self);
chk.Caption := '定制';
chk.Parent := stringgride;
chk.Tag := i;
rt := stringgride.CellRect(ColNo_IsCustom,i);
with chkdo
begin
Left := stringgride.Left + rt.Left + 5;
Top := stringgride.Top + rt.Top + 4;
Width := rt.Right - rt.Left - 14;
Height := stringgride.DefaultRowHeight - 4;
Font.Size := 11;
end;
chk.OnClick := chkIsCustomClick;
chk.OnKeyPress := chkIsCustomKeyPress;
end;
end;
 
已解决!
 
后退
顶部