Delphi - вывод всех данных с таблицы

@ridek · Регистрация: 30.07.2015

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

Всем привет.
Возникла такая проблема, что нужно вывести все данные которые находятся в таблице users в компонент Label, да так чтобы компонент Label создавался автоматически столько раз сколько записей в таблице.

Скандербег · 30.07.2015, 23:49

Затея, конечно, дурацкая, но сделать ее проще простого:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var 
  L : TLabel;
  T : Integer;
begin
  T := 10;
  Dataset.Open;
  while not DataSet.Eof do begin
    L := TLabel.Create(self);
    L.Parent := Self;
    L.Top := T; L.Left := 8;
    L.Caption := Dataset['Field1']+', 'Dataset['Field2'];
    Inc(T, 18);
    DataSet.Next;
  end;

@northener · 31.07.2015, 01:19

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

Возникла такая проблема, что нужно вывести все данные которые находятся в таблице users в компонент Label, да так чтобы компонент Label создавался автоматически столько раз сколько записей в таблице.

Мне просто страшно на ночь глядя представить себе форму с этими многотысячными Label'ами. Тем более учитывая, что в таблице БД, как правило, полей больше одного.
TDBGrid или TStringGrid не подходят?

@ridek · 31.07.2015, 22:15 **[ТС]**

Grid не подходит.
А выборка данных будет идти по одному полю и для каждого пользователя отдельно. Так что максимум записей будет около 10.

Скандербег · 31.07.2015, 22:44

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

Grid не подходит.

Это от чего же?
Какая разница где будут отображаться данные. В нескольких TLabel или в нескольких ячейках табличного компонента?
Хоть тресни, а разницы нет.

@ridek · 31.07.2015, 23:29 **[ТС]**

Разницы нет куда выводить в Label или Grid, это да.
Но Grid не подходит, из-за того что самое построение списка не устраивает ( не вписывается в интерфейс программы ).

Новые блоги и статьи Все статьи Все блоги /
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .

@ridek 0 / 0 / 0 Регистрация: 30.07.2015 Сообщений: 8

	MS SQL Delphi - вывод всех данных с таблицы 30.07.2015, 17:54. Показов 2568. Ответов 5 Метки нет (Все метки) Всем привет. Возникла такая проблема, что нужно вывести все данные которые находятся в таблице users в компонент Label, да так чтобы компонент Label создавался автоматически столько раз сколько записей в таблице. 0

@ridek 0 / 0 / 0 Регистрация: 30.07.2015 Сообщений: 8
	31.07.2015, 22:15 [ТС]
	Grid не подходит. А выборка данных будет идти по одному полю и для каждого пользователя отдельно. Так что максимум записей будет около 10. 0

@ridek 0 / 0 / 0 Регистрация: 30.07.2015 Сообщений: 8
	31.07.2015, 23:29 [ТС]
	Разницы нет куда выводить в Label или Grid, это да. Но Grid не подходит, из-за того что самое построение списка не устраивает ( не вписывается в интерфейс программы ). 0

Delphi - вывод всех данных с таблицы

Решение