12

TcheckListBoxコントロールを使用していて、これに2番目の列を使用したいのですが、ColumnsプロパティとHeaderプロパティ以外に、複数列のコンテンツを挿入するためのソースが見つかりませんでした...

それは初心者の質問のように見えるかもしれませんが、Delphiのヘルプにはこれに関するコンテンツがなく、私の検索（GoogleとSOで）は多くのゴミをもたらしました...

例が必要です。

4

2 に答える 2

22

これは、を使用しては不可能TCheckListBoxです。

ただし、を使用できますTListView。

ViewStyleプロパティをvsReportとCheckboxesに設定しますTrue。


列を作成してアイテムを追加するには：

procedure TFormMain.Button1Click(Sender: TObject);
var
  Item1, Item2: TListItem;
begin
  ListView1.Columns.Add.Caption := 'aa';
  ListView1.Columns.Add.Caption := 'bb';

  Item1 := ListView1.Items.Add;
  Item1.Caption := 'item1';
  Item1.SubItems.Add('subitem1');

  Item2 := ListView1.Items.Add;
  Item2.Caption := 'item2';
  Item2.SubItems.Add('subitem2');
  Item2.Checked := True;
end;


次のようになります：

チェックボックス付きのリストビューhttp://img638.imageshack.us/img638/4681/clipboard01y.png

于 2010-02-10T16:24:30.960 に答える
9

私は間違っている可能性がありますが、列はフォーマットではなく折り返し用だと思いました。

例えば、

列数を2に設定します。3つまたは4つのアイテムを追加します。ボックスのサイズを垂直方向に変更すると、アイテムが列を埋めるために流れるのがわかります。

于 2010-02-10T16:25:54.473 に答える