Вывод из БД access?

@ASYRA · Регистрация: 10.02.2013

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

Доброго времени суток, не могу выполнить следующую задачу есть База, в базе есть столбец Вопросы, там 5 вопросов, так вот мне нужно из столбца Вопросы вывести по порядку текстовые данные в label 1, 2, 3, 4, 5.
Пример!
Вопрос 1 label 1
Вопрос 2 label 2
Вопрос 3 label 3
Вопрос 4 label 4
Вопрос 5 label 5

@Waddonator · 20.05.2013, 13:32

Delphi

var i:integer;
...
   //устанавливаете курсор на первую запись в таблице базы
   for i:=1 to 5 do
      begin
         (FindComponent('Label'+IntToStr(i)) as TLabel).Caption:=...;
         // переходите на следующую строку в таблице базы
      end;

@ASYRA · 20.05.2013, 13:42 **[ТС]**

Pascal

  //Label2.Caption:=qry1.FieldByName('Вопросы').AsString;
  //chk1.Caption:=qry1.FieldByName('Ответ 1').AsString;
  //chk2.Caption:=qry1.FieldByName('Ответ 2').AsString;
 
  //Label3.Caption:=qry1.FieldByName('Вопросы').AsString;
  //chk3.Caption:=qry1.FieldByName('Ответ 1').AsString;
  //chk4.Caption:=qry1.FieldByName('Ответ 2').AsString;

Вот что то типа такого, только у меня в Label3 выводит тот же вопрос что и в Label2 точней нет перехода на следующую строку, я не знаю как это сделать!

@Waddonator · 20.05.2013, 13:48

Добавьте переход к следующей записи (5-ой строкой):

Delphi

1	qry1.Next;

@ASYRA · 20.05.2013, 13:54 **[ТС]**

Эх как это просто, спасибо большое!

@ASYRA 0 / 0 / 0 Регистрация: 10.02.2013 Сообщений: 36
		1
	Вывод из БД access? 20.05.2013, 13:19. Показов 611. Ответов 4 Метки нет (Все метки) Доброго времени суток, не могу выполнить следующую задачу есть База, в базе есть столбец Вопросы, там 5 вопросов, так вот мне нужно из столбца Вопросы вывести по порядку текстовые данные в label 1, 2, 3, 4, 5. Пример! Вопрос 1 label 1 Вопрос 2 label 2 Вопрос 3 label 3 Вопрос 4 label 4 Вопрос 5 label 5 0

@ASYRA 0 / 0 / 0 Регистрация: 10.02.2013 Сообщений: 36
	20.05.2013, 13:54 [ТС]	5
	Эх как это просто, спасибо большое! 0