Ошибка с sql запросом

[mmihan]

Здравствуйте
Подскажите (помогите) разобраться с ошибкой

В DBgrid отображается содержимое таблицы.

Кликая Двойным щелчком.. открывается форма подставляя значения в Edit,ы

procedure TMform.DBGrid1DblClick(Sender: TObject);

begin

Showform.EDIT1.Text := DBGrid1.DataSource.DataSet.FieldByName('КЛ').AsString;
Showform.EDIT2.Text := DBGrid1.DataSource.DataSet.FieldByName('ФИО').AsString;
Showform.EDIT3.Text := DBGrid1.DataSource.DataSet.FieldByName('Адрес').AsString;
.........
    showForm.ShowModal;

end;

Если произвести отбор (Поиск) DBgrid
и клинуть по строке

procedure TMform.SearchDoc(Sender: TObject);
var
   dt1,dt2:Tdate;
begin
  dt1:=DateTimePicker1.DateTime;
  dt2:=DateTimePicker2.DateTime;

  ADOQuery1.Close;
  ADOQuery1.SQL.Clear; 
  ADOQuery1.SQL.Add('select КЛ as Номер, ФИО,Адрес ') ;
  ADOQuery1.SQL.Add('from Клиент');
  ADOQuery1.SQL.Add('where ((КЛ  LIKE ''%'+Edit1.Text+'%'') AND (ФИО  LIKE   ''%'
 +Edit2.Text+'%'' OR ФИО IS NULL ) ANd  (Адрес LIKE   ''%'+Edit3.Text+'%'' OR Адрес IS NULL   )    )');

  ADOQuery1.Open; {выполняем запрос}
  ADOQuery1.Active:=true;
  DataSource1.DataSet:=ADOQuery1;
  DbGrid1.DataSource:=DataSource1;

  end;

То вылетает ошибка ADOQuery1: Field 'Поле1' не найдено
выделя Showform.EDIT1.Text := DBGrid1.DataSource.DataSet.FieldByN ame('КЛ').AsString;

[Аватар]

select КЛ as Номер, ФИО,Адрес,

Запятую в конце уберите

add

Надо же , почти в один секунд ответили

[Stilet]

select КЛ as Номер, ФИО,Адрес,

Запятая после поле адреса предполагает указание поля, а у тебя сразу from идет.
Уберай запятую или вноси в список еще поле, какое нужно.

[mmihan]

Извените...забыл стереть ее.. Я не стал весь запрос.. со всеми полями вставлять... Запятую стер...

[Прик]

Ну еще, в порядке возможной проблемы:
В фильтрующем запросе применяется алиас поля КЛ (Номер)

ADOQuery1.SQL.Add('select КЛ as Номер, ФИО,Адрес, ') ;

но далее, тем не менее, происходит обращение к значению поля не по псевдониму:

Showform.EDIT1.Text := DBGrid1.DataSource.DataSet.FieldByName('КЛ').AsString;

[mmihan]

Спасибо помогло..
Тогда не подскажите как поле в BDgrid по другому переОБозвать?

[Прик]

В DBGrid есть возможность составить список полей таблицы, которые должны отображаться (свойство Columns). У каждой колонки есть свойство Title, где, в свою очередь, в свойстве Caption заголовок колонки сделать каким угодно.
Если не создавать такой список самостоятельно, то DBGrid создает его сам, используя данные из подключенного датасета.

[mmihan]

Спасибо большое .

DbGrid1.Fields[0].DisplayLabel:='Номер'
Решило проблему..

может это и быдло кодерство... но я только учусь)