Type mismatch in expression

[Аватар]

DM типа точно DateTime или все таки Varchar или Char?

[boomko55]

Несколько раз в базе перепроверил datatype-datetime. К тому же для запроса из 1 таблицы, типа:

SELECT DM, Surname, Name1, Name2, Phone
FROM Base2
where DM > : date1
and Phone is not NULL

все работает прекрасно.

Проблема начинается именно тогда когда я запрос делаю из 2 таблиц.

[=master=]

: date1

Это что такое?

[Аватар]

Типа пробел лишний

[boomko55]

Сообщение от Аватар

Типа пробел лишний

Нет, пробел я туда вставил только на форуме, так как если поставить слитно : и d получался смайлик. В самом запросе пробела там нету, однозначно.

С этим разобрался. Спасибо за помощь.
Прошу прощение что чуток отклоняюсь от темы, но у меня есть еще 1 вопрос.
Надо из запрошенных данных которые вывелись в dbgrid, вытащить их в эксель при чем не все столбцы. Вывод самих данных в эксель я нашел код и он работает успешно. А вот чтоб конкретный вывод некоторых столбцов и склеиванием их в 1 столбец, не могу сообразить.
Написал что-то страшное помогите мне разобраться, пожалуйста.

var
i: Integer;
ExcelApp,sheet: Variant;
begin
ExcelApp := CreateOleObject('Excel.Application' );
ExcelApp.Visible := False;
ExcelApp.WorkBooks.Add(-4167);
ExcelApp.WorkBooks[1].WorkSheets[1].name := 'Export';
rec:= VarArrayCreate([0,500000,0,2],varVariant);
DBGrid1.DataSource.DataSet.First;
for i:=1 to DBGrid1.DataSource.DataSet.RecordCo unt do
begin
rec[i,1] :=DBGrid1.Fields['Phone'].AsString;
rec[i,2] :=DBGrid1.Fields['SurName'].AsString +' '+ DBGrid1.Fields['Name1'].AsString +' '+ DBGrid1.Fields['Name2'].AsString;
end;
ExcelApp.WorkSheets[1].Range['a1','b'].value:=rec;
ExcelApp.Visible := true;

Ругается на 2 строчки:

rec[i,1] :=DBGrid1.Fields['Phone'].AsString;
rec[i,2] :=DBGrid1.Fields['SurName'].AsString +' '+ DBGrid1.Fields['Name1'].AsString +' '+ DBGrid1.Fields['Name2'].AsString

и пишет Incompatible types: 'Integer' and 'string'