문제

Tchecklistbox 컨트롤을 사용하고 있으며 이것에 두 번째 열을 사용하고 싶지만 열 및 헤더 속성 외에도 소스를 찾을 수 없습니다. 삽입 다중 검은 내용 ...

그것은 Noobie 질문처럼 보일 수 있지만 Delphi의 도움은 이것에 대한 내용이없고 내 검색 (Google 등에서)은 많은 쓰레기를 가져 왔습니다 ...

예제 만 필요합니다.

도움이 되었습니까?

해결책

이것은 a를 사용하여 불가능합니다 TCheckListBox.

그러나 당신은 a를 사용할 수 있습니다 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

다른 팁

나는 틀릴 수 있지만 열은 서식 목적보다는 래핑을위한 것이라고 생각했다.

예,

열 수를 2로 설정하여 3 개 또는 4 개의 항목 추가 상자 크기를 수직으로 조정하면 항목이 열을 채우는 것을 볼 수 있습니다.

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top