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

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

Как в строку SQL запроса вставить переменную ? [D7, FireBird 1.0]


3D-Dragon ©   (2002-12-07 23:56:00) 

Есть переменная

some_var: string;

Как мне её вставить в строку SQL запроса ?
типа:

SELECT some_var FROM ...

У меня на форме стоит компонент IB_Query ...
Delphi 7
FireBird 1.0


3D-Dragon   (2002-12-08 06:36:00) [1]

oss ©
СПАСИБО за помощь, я разобрался.
Всё заработало !!!


3D-Dragon   (2002-12-08 06:27:00) [2]

Про книги я знаю и упорно читаю :)
Признаюсь, что новичек в Delphi, но ведь и форум для того, чтобы поставили на путь истинный ...

Не получалось так, я уже как только не пробовал и по твоему примеру все равно получаю ошибку при первом обращении:

Dynamiс SQL error

повторно если делаю выборку, то всё работает ... :(

Вот код, подскажите, пож-та, КАК правильно напиСать ?

// Выбираем "на что"
procedure TfMakeStavkaOrdinar.ComboOsnovChange(Sender: TObject);
var
stroka: string;
vid: string;
koef: string;
begin
stroka:=ComboOsnov.Items.Strings[ComboOsnov.ItemIndex];
IB_Query_NaChto.ParamByName("ishod").Value := stroka;

vid:=IB_Query_NaChto.FieldByName("na_chto").Value;
IB_Query_NaChto.Open;

IB_Query_Koef.sql.clear;
IB_Query_Koef.sql.add(" select "+vid+" from client_lines");
IB_Query_Koef.Open;

koef:=IB_Query_Koef.FieldByName(vid).Value;
Edit1.Text:=koef;
end;


oss   (2002-12-08 00:26:00) [3]

IB_Query.sql.clear;
IB_Query.sql.add(" select "+some_var+" from .."
IB_Query.Open;

а вообще полезно читать книги еще...


Наверх

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