paso de parametros

[gustavo2]

Hola y Gracias por todo...

En tablas planas y con tquery como puedo pasar parametros desde ttable para hacer las consultas sql.

Saludos...

[roman]

¿Te refieres a algo como

Query.ParamByName('uncampo').AsXXX := Table.FieldByName('otro campo').AsXXX?

// Saludos

[gustavo2]

Bien Gracias me sirve

Ahora para recibir desde otros componentes parametros como un edit y
mostrar en tiempo de ejecucion ordenes sql.

Saludos ...

[__cadetill]

mmmm, pues del mismo modo

Query.ParamByName('uncampo').AsString := Edit1.Text;
Query.ParamByName('uncampo').AsInteger := StrToInt(Edit1.Text);
Query.ParamByName('uncampo').AsFloat := StrToFloat(Edit1.Text);
.........

Lo de mostrar las ordenes SQL no lo he entendido :(

[Lepe]

mostrar en tiempo de ejecucion ordenes sql

es algo como..... Showmessage(qry.sql.text);:confused:
o enviarlo a un archivo de texto para hacer un debug ??

[gustavo2]

Bien gracias a todos...
Mi duda es si se puede hacer algo como
select campo
from tabla
where campo>var // var contenido edit.text por ej.
Si no tendre que recurrir a procedimientos para esto.
Saludos...

[__cadetill]

bueno, si asignas la sentencia SQL por código quedaría algo así


Query.SQL.Add('select *');
Query.SQL.Add(from tabla');
Query.SQL.Add('where campo = ' + Edit1.Text); // <- si fuera numérico
Query.SQL.Add('where campo = ' + QuotedStr(Edit1.Text)); // <- si fuera alfa


Si asignas el SQL en el propio componente quedaría


select *
from tabla
where campo = :val

donde "val" será un parámetro que deberás informar por código

Espero te sirva

[gustavo2]

Bien me sirvio todo..
al paso de parametros por codigo que me enviaron le agregue
with query do
begin
close;
sql.clear;
//
//
sql.execsql;
open;
end;
Gracias por todo !!!
Saludos Gustavo2....