como cargar un Query en tiempo de ejecucion
 

Amigos

Tengo un query creado en tiempo de ejecucion , y necesito hacer un select
var
query:=tquery;


source:=tdatasource.Create(source);
query:=tquery.Create(query);
source.DataSet:=query;
query.DatabaseName:=dm.TranServerDB.DatabaseName;
dbgrid2.DataSource:=source;

query.Close;
query.SQL.Clear;
query.SQL.Add('select * from ts.ts_transupportmaster');
query.Open;


hasta aqui todo bien pero si quiero filtrar el query por la llave

ej:

query.Close;
query.SQL.Clear;
query.SQL.Add('select * from ts.ts_productmaster where TRANSUPPORTID='+chr(39)+edtransupportid.Text+chr(39)+'');
query.Open;

if query.RecordCount=1 then begin
showmessage('Code already exist..')
end;

me dice este error :

Invalid column name 'TRANSUPPORTID'

El problema es que en la empresa no me permiten cargar los query con los campos de la tabla en tiempo de dise;o , de ser dinamico.

Por tanto el campo TRANSUPPORTID no existe en el query, con hago para que lo reconozca

En el Mensaje de ERROR esta tu respuesta, si checas te esta indicando que el campo 'TRANSUPPORTID' no EXISTE


y Te podria recomendar para ser mas simple tus consultas
puedes utilizar

QuotedStr( < valor_string >)

ejemplo

QuotedStr(edtransupportid.Text)
que equivale a chr(39)+ edtransupportid.Text + chr(39)