[[Ivanzinho]]

Empezado por ContraVeneno

Código Delphi [-]
...
SQL.Add('where empresa='+StrToInt(DBEcodigo));
Open;
end; //with TuDataset

...

Si DBEcodigo es un string basta con que se haga

Código Delphi [-]
SQL.Add('where empresa='+DBEcodigo);

y si es un integer habrá que hacer

Código Delphi [-]
SQL.Add('where empresa='+IntToStr(DBEcodigo));