Горизонтальный Listbox

@ANDAHAY · Регистрация: 06.02.2015

Author24 — интернет-сервис помощи студентам

Ребят, вот какая тему нужна, можно ли сделать в listbox так чтобы он при заполнении элементов когда доходил до своей нижней границы, создавалась бы новая колонка и она снова заполнялась пока не кончится и т.д. И что бы можно было скролить эти колонки горизонтально.

@Narimanych · 15.04.2015, 14:00

ANDAHAY,

А может лучше StringGrid использовать?

@northener · 15.04.2015, 14:06

Сообщение от ANDAHAY

можно ли сделать в listbox так чтобы он при заполнении элементов когда доходил до своей нижней границы, создавалась бы новая колонка и она снова заполнялась пока не кончится и т.д. И что бы можно было скролить эти колонки горизонтально.

Можно. TListBox.Columns задать значение не равное 0

@Narimanych · 15.04.2015, 14:29

Delphi

rocedure TForm1.FormCreate(Sender: TObject);
begin
  with listbox1 do
  begin
  for i:=1 to 100 do
   begin
   Items.Add(IntTostr(i));
   if Items.Count= 20 then // Если число строк = 20 то
 
   Columns:=Columns+1;// добавить колонку
   end;
 
  end;
end;
 
end.

@northener · 15.04.2015, 14:51

Narimanych, лишние телодвижения. Листбокс сам все сделает. А свойство Columns означает не полное количество колонок, а количество колонок видимых без горизонтального скроллирования.

@Narimanych · 15.04.2015, 14:59

northener,

Спасибо,
Буду знать.

@ANDAHAY · 15.04.2015, 15:03 **[ТС]**

Narimanych, Спасибо, всё получилось. Вот еще какой вопрос. Можно ли как то настроить ширину колонки?

@northener · 15.04.2015, 15:08

The width of each column depends upon both the Width property and the number of Columns.
TCustomListBox.Columns

@ANDAHAY 1 / 1 / 0 Регистрация: 06.02.2015 Сообщений: 58
		1
	Горизонтальный Listbox 15.04.2015, 13:48. Показов 2840. Ответов 7 Метки нет (Все метки) Ребят, вот какая тему нужна, можно ли сделать в listbox так чтобы он при заполнении элементов когда доходил до своей нижней границы, создавалась бы новая колонка и она снова заполнялась пока не кончится и т.д. И что бы можно было скролить эти колонки горизонтально. 0

@Narimanych 2724 / 1701 / 776 Регистрация: 23.03.2015 Сообщений: 5,388
	15.04.2015, 14:00	2
	ANDAHAY, А может лучше StringGrid использовать? 0

@northener пофигист широкого профиля 4735 / 3168 / 860 Регистрация: 15.07.2013 Сообщений: 18,255
	15.04.2015, 14:06	3
	Сообщение от ANDAHAY можно ли сделать в listbox так чтобы он при заполнении элементов когда доходил до своей нижней границы, создавалась бы новая колонка и она снова заполнялась пока не кончится и т.д. И что бы можно было скролить эти колонки горизонтально. Можно. TListBox.Columns задать значение не равное 0 0

@northener пофигист широкого профиля 4735 / 3168 / 860 Регистрация: 15.07.2013 Сообщений: 18,255
	15.04.2015, 14:51	5
	Narimanych, лишние телодвижения. Листбокс сам все сделает. А свойство Columns означает не полное количество колонок, а количество колонок видимых без горизонтального скроллирования. 1

@Narimanych 2724 / 1701 / 776 Регистрация: 23.03.2015 Сообщений: 5,388
	15.04.2015, 14:59	6
	northener, Спасибо, Буду знать. 0

@ANDAHAY 1 / 1 / 0 Регистрация: 06.02.2015 Сообщений: 58
	15.04.2015, 15:03 [ТС]	7
	Narimanych, Спасибо, всё получилось. Вот еще какой вопрос. Можно ли как то настроить ширину колонки? 0

@northener пофигист широкого профиля 4735 / 3168 / 860 Регистрация: 15.07.2013 Сообщений: 18,255
	15.04.2015, 15:08	8
	The width of each column depends upon both the Width property and the number of Columns. TCustomListBox.Columns 1