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

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

RadioGroup и БД


Kripton ©   (2007-05-28 22:03:00) 

Здравствуйте, проблема такая:
надо сделать чтобы в RadioGroup.Items.Text выводились результаты такого вот запроса
Select distinct Nositel from Media
юзаю BDE (работаю в Borland Developer Studio 2006)
то есть если есть таблица
Nositel
CD
DVD
CD
VCD
Cassette
DVD
то в RadioGroup должны быть поля CD DVD VCD и Cassette

И ещё проблема: у мя не хочет обрабатываться запрос:
Select * from
(Select * from
(Select * from
(Select * from
(Select * from
(Select * from
(Select :Chto from Media
where Nositel LIKE :Nos)
Where Nazvanie LIKE :Nam)
Where Razdel LIKE :Razd)
Where Zhanr LIKE :Zanr)
Where God LIKE :G)
Where Album LIKE :Alb)
Where Productor LIKE :Creator)

Можт эт я идиот(скорее всего так и есть, потому что совсем надавно начал разбираться в БД, но нигде в и-нете ответа не нашёл.
Заранее большое спасибо за помощь.


Anatoly Podgoretsky   (2007-05-30 09:55:00) [1]

> Kripton  (30.05.2007 01:16:06)  [6]

Плохо разобрался, смотри метод Add


Kripton   (2007-05-30 01:16:00) [2]

о, всё, разобрался...
если кому интересно: вывод результата запроса:
Select Distinct Nositel from Media
в TComboBox (СBNos):

 with QNos do
   begin
     First;
     while not eof do
       begin
         CBNos.Items.AddObject(FieldByName('Nositel').AsString, TObject(0));
         Next;
       end
   end;

где QNos - TQuery c запросом Select Distinct Nositel from Media


Kripton   (2007-05-29 22:58:00) [3]

а всё-тки, как загрузить список значений одного из столбцов БД в Memo, к примеру


Anatoly Podgoretsky   (2007-05-28 22:45:00) [4]

> Kripton  (28.05.2007 22:41:03)  [3]

Убери параметр - это не возможно


Kripton   (2007-05-28 22:41:00) [5]

сообщает:
Invalid use of keyword
Token: Select
Line Number: 2

пробовал тот же запрос в таком виде:
Selest :Chto from Media
Where (...=...)and(...=...)and(...=...)......
он просто виснет


Anatoly Podgoretsky   (2007-05-28 22:32:00) [6]

> Kripton  (28.05.2007 22:03:00)  [0]

Если не хочет, то обязан сообщить об ошибке.


Loginov Dmitry   (2007-05-28 22:24:00) [7]

> И ещё проблема: у мя не хочет обрабатываться запрос:


Что за адское месиво?...


Наверх

Титульная страница Поиск, карта сайта Написать письмо