Формирование имени файла для Query в программе

[nataly_ukr]

Есть два dbf файла Нужно их связать , но сделать в программе , так как имя файла формируется в ней же Выдает ошибку Не найден файл imjm.dbf
imjm:='kasot'+rmes2+'.dbf';
imjmi:='kasot'+rmes2+'.mdx';

imjm2:='otcet'+rmes2+'.dbf';
imjm2i:='otcet'+rmes2+'.mdx';

Form20.Table1.Active:=false;
Form20.Table1.TableName:=imjm;
Form20.Table1.Close;

Form20.Table1.Active:=True;

Form20.Table2.Active:=false;
Form20.Table2.TableName:=imjm2;
Form20.Table2.Close;

Form20.Query1.Close;
Form20.Query1.Sql.Clear;

Query1.Sql.text:='select b.* from imjm a,imjm2 b where (a.ddok=b.ddok and a.ndok=b.ndok and a.kfio=b.kfio)';
Form20.Query1.Open;
Query1.Active:=true;

 

[DZX]

В строке запроса необходимо выделить переменные 'начало запроса'+imjm+'далее', а не внедрять в саму строку это ж не php.

 

[Guest]

var s: string;


s:='rmes2';
Query.SQL.Add('Select * from '+s+' where... и т.д.....

 

[nataly_ukr]

Query1.Sql.Add('select b.* from');
Query1.Sql.Add(imjm);
Query1.Sql.Add(' a,');
Query1.Sql.Add(imjm2);
Query1.Sql.Add(' b where (a.ddok=b.ddok and a.ndok=b.ndok and a.kfio=b.kfio');


Испарвьте ошибкуб пожалуйста

z1:=imjm;
z2:=imjm2;
// Query1.Sql.text:='select b.* from'+imjm+' a,'+imjm2+' b where (a.ddok=b.ddok and a.ndok=b.ndok and a.kfio=b.kfio')';
Query1.Sql.Add('select b.* from'+z1);
Query1.Sql.Add(' a,'+z2+' b where (a.ddok=b.ddok and a.ndok=b.ndok and a.kfio=b.kfio');



исправила по совету Белого Волка Все равно оибка синтаксиса

 

[Guest]

Ой, ну, это же не ПХП...