[vtdeleon]

Saludos

En un procedimiento

Código Delphi [-]
 
AdoQuery.Sql.text:='select * from acum_modulo where id_cocina='+lblClaveCocina.caption;
AdoQuery.Open;

(desde el String List Editor)

Ahi debes asignar un parametro, ej:

Código SQL [-]
select * from acum_modulo where id_cocina=:ClaveCocina

Y mediante codigo asignar el valor.

Código Delphi [-]
AdoQuery.Parameter.ParamByname('clavecocina').value:=lblClaveCocina.caption;