RadioGroup и БД

← →
Kripton © (2007-05-28 22:03) [0]

Здравствуйте, проблема такая:
надо сделать чтобы в 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)
Можт эт я идиот(скорее всего так и есть, потому что совсем надавно начал разбираться в БД, но нигде в и-нете ответа не нашёл.
Заранее большое спасибо за помощь.

← →
Loginov Dmitry © (2007-05-28 22:24) [1]

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

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

← →
Anatoly Podgoretsky © (2007-05-28 22:32) [2]

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

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

← →
Kripton © (2007-05-28 22:41) [3]

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

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

← →
Anatoly Podgoretsky © (2007-05-28 22:45) [4]

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

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

← →
Kripton © (2007-05-29 22:58) [5]

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

о, всё, разобрался...
если кому интересно: вывод результата запроса:
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 (30.05.2007 01:16:06) [6]

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

RadioGroup и БД Найти похожие ветки