| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

База данных [D7, XP]

Gizza ©   (2006-06-30 16:39:00) 

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

---

Gizza   (2006-06-30 18:59:00) [1]

>
> 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итд.

---

unknown   (2006-06-30 17:56:00) [2]

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

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

---

TUser   (2006-06-30 17:28:00) [3]

afaik - select distinct

---

unknown   (2006-06-30 16:45:00) [4]

 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;

---

Наверх