Вниз
Скачать: CL | DM;

База данных   Найти похожие ветки 

← →
Gizza ©   (2006-06-30 16:39) [0]

Доброго времени.
Значит есть БД, примерно след содержания: Вопрос, ответ1, ответ2, правильный.
Как сделать так, чтобы при создании формы (или еще когда нибудь) в DBListBox1 загружались все значения из колонки "Вопрос", чтобы можно было их все сразу посмотреть?
Заранее спасибо.


← →
unknown ©   (2006-06-30 16:45) [1]

 Query.SQL.Text := "select Вопрос from БД";
 Query.Active   := True;
 while not Query.EOF do
 begin
   DBComboBox1.Items.Add(Query.Fields[0].AsString);
   Query.Next;
 end;
 Query.Active := False;


← →
TUser ©   (2006-06-30 17:28) [2]

afaik - select distinct


← →
unknown ©   (2006-06-30 17:56) [3]


> TUser ©   (30.06.06 17:28) [2]

Зависит от проектирования бд. По идее, на "Вопрос" вообще надо уникальный
индекс :)


← →
Gizza ©   (2006-06-30 18:59) [4]


>
> Query1.SQL.Text := "select Вопрос from data";
>  Query1.Active   := True;
>  while not Query1.EOF do
>  begin
>    DBListBox1.Items.Add(Query1.Fields[0].AsString);
>    Query1.Next;
>  end;
>  Query1.Active := False;
>



Спасибо, все работает, только теперь не получается, чтобы при нажатии на Item в DBListBox1 загружались в DBEdit1 - Ответ1 итд.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c
3-1147609558
eJack
2006-05-14 16:25
2006.07.16
Живые наборы данных


6-1140887955
Sco
2006-02-25 20:19
2006.07.16
IP адресса


5-1135472981
sirin
2005-12-25 04:09
2006.07.16
Список классов, зарегестрированных в Delphi


3-1147780912
novill
2006-05-16 16:01
2006.07.16
Как очистить строку от лидирующих/завершающих непечатных символов


6-1134736695
SPACE!!
2005-12-16 15:38
2006.07.16
Клт.-Серв. приложение на WinSock с большим количеством клиентов.




   Наверх