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

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

Запрос на выборку . [D7]


Golik ©   (2006-04-16 15:03:00) 

пользоваткль вводит в Edit букву и должны отображаться все фамилии начинающиеся на эту букву.
код по кнопке найти:

datamodule2.ADOQuery1.Close;
datamodule2.ADOQuery1.SQL.Text := 'Select * From reestr Where([ФИО] like (edit1.text%))' ;
datamodule2.ADOQuery1.ExecSQL;
datamodule2.ADOQuery1.Active := true;

но неработает . выдает ошибку- ошибка синтаксиса!
где ошибка подскажите ???


Ярослав   (2006-04-19 12:21:00) [1]

Я делаю это вот так --

begin
sermar:=cxtextedit1.Text;
   dm.ABSQuery1.Close ;
dm.ABSQuery1.SQL.Clear ;
  dm.ABSQuery1.SQL.Add('select * from oborud ob, stoim st,otr ot, predpr pr  where  ');
 
dm.ABSQuery1.SQL.Add('ob.markir like :aaa ');

dm.ABSQuery1.ParamByName('aaa').AsString:='%'+sermar+'%'  ;
 
dm.ABSQuery1.Open ;
  end;
Используй  (paramByName('......').AsString)


Хозяин   (2006-04-17 07:26:00) [2]

наверное [4]

если MSSQL (не нашел уточнения)
то:
datamodule2.ADOQuery1.SQL.Text := 'Select * From reestr Where [ФИО] like '''+edit1.text+'%''';


Golik   (2006-04-16 16:36:00) [3]

ФИО это имя поля!


Alarm   (2006-04-16 16:32:00) [4]

>Golik   (16.04.06 15:03)  
Что такое [ФИО] (неужели это имя поля)?

Ну и в Alarm ©   (16.04.06 15:24) [2]


> datamodule2.ADOQuery1.SQL.Text := 'Select * From reestr Where ([ФИО] like ' +  edit1.text + '% ' )' ;

лишний апостров, нужно
datamodule2.ADOQuery1.SQL.Text := 'Select * From reestr Where ([ФИО] like ' +  edit1.text + '%)' ;


Golik   (2006-04-16 16:17:00) [5]

to Virgo_Style
строка после Like в ковычках
to Alarm
убрал строку всеравно нехочет!


Virgo_Style   (2006-04-16 16:13:00) [6]

строка после like в кавычках, наверное, должна быть?


Alarm   (2006-04-16 16:13:00) [7]

Мне кажется, что
> datamodule2.ADOQuery1.ExecSQL;
эта строка лишняя, попробуй ее заремить


Golik   (2006-04-16 16:08:00) [8]

все равно таже ошибка.
выделяет эту строку -
datamodule2.ADOQuery1.Active := true;


Alarm   (2006-04-16 15:24:00) [9]


> datamodule2.ADOQuery1.SQL.Text := 'Select * From reestr  Where([ФИО] like (edit1.text%))' ;

Попробуй так:
datamodule2.ADOQuery1.SQL.Text := 'Select * From reestr  Where ([ФИО] like ' +  edit1.text + '%')' ;

И кроме того уточни,  в каком месте сообщает об ошибке синтаксиса
(так как в твоем посте не хватает нескольких пробелов)


Virgo_Style   (2006-04-16 15:06:00) [10]

Golik   (16.04.06 15:03)
где ошибка подскажите ???


> like ( edit1.text>%</B))


Наверх

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