ты не правильно пишеш запрос с оператором Like. Привожу пример на своем поекте. Поиск по двум полям из БД по мере набора букв.
procedure TForm10.Edit1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
Poisk.Close;
Poisk.SQL.Strings[13] := 'Where (fio Like :a) and (gorod Like :b)'; // половина запроса уже записано в TQuery.
Poisk.Prepare;
Poisk.Params[0].AsString := Edit1.Text+'%';
Poisk.Params[1].AsString := Edit2.Text+'%';
Poisk.Open;
end;
Тебе нужно определиться, писать полностью фамилю, имя и класс или ты хочешь сделать поиск по нескольким буквам фамилии или имени или номеру класса. Последнее я думаю предпочтительней.
|