Bagaimana saya menggunakan banyak kolom di TCheckListBox?

Saya menggunakan kontrol TcheckListBox dan ingin menggunakan kolom kedua untuk ini, tetapi selain properti Kolom dan Header, saya tidak dapat menemukan sumber apa pun tentang memasukkan konten multikolom...

Ini mungkin terlihat seperti pertanyaan noobie, tetapi bantuan Delphi tidak memiliki konten apa pun mengenai hal ini, dan pencarian saya (di Google dan SO) menghasilkan banyak sampah...

Saya hanya butuh contoh.


person Fabricio Araujo    schedule 10.02.2010    source sumber
comment
@Fabricio, TChecklistbox hanya memiliki satu kolom data secara efektif, properti kolom hanya digunakan untuk menggabungkan item ke kolom lain.   -  person RRUZ    schedule 10.02.2010
comment
Saya akan mengikuti jalur Listview yang ditunjukkan ulrichb.   -  person Fabricio Araujo    schedule 10.02.2010


Jawaban (2)


Ini tidak mungkin dilakukan dengan menggunakan TCheckListBox.

Namun Anda dapat menggunakan TListView.

Setel properti ViewStyle ke vsReport dan Checkboxes ke True.


Untuk membuat kolom dan menambahkan item:

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;


Sepertinya:

http://img638.imageshack.us/img638/4681/clipboard01y.png

person ulrichb    schedule 10.02.2010
comment
Hmm... Ide yang menarik. Saya akan menjelajahinya besok. - person Fabricio Araujo; 10.02.2010

Saya bisa saja salah, tetapi saya pikir kolom-kolom itu untuk membungkus, bukan untuk tujuan pemformatan.

eg,

Atur jumlah kolom menjadi 2 Tambahkan 3 atau 4 item Ubah ukuran kotak secara vertikal dan Anda akan melihat aliran item untuk mengisi kolom

person Mark Robinson    schedule 10.02.2010
comment
Ya, tetapi tetap dibungkus meskipun Anda tidak menginginkannya. Saya mengubah ukurannya secara vertikal dan alih-alih mendapatkan bilah gulir vertikal yang masuk akal, saya mendapatkan bilah gulir horizontal yang bodoh meskipun kolom disetel ke 1. Komponen yang berpotensi berguna dibuang ke tempat sampah karena desain yang buruk. - person Paul McCarthy; 29.06.2017