jejejr, entonces no habia entendido lo que necesitabas, solo debo apuntar que los parametros tambien los puedes usar en la condicion de NO_FACTURA para que no tengas que concatenar, asi:
Código Delphi
[-]
query1.DatabaseName:='D:\Documents and Settings\Administrador\Escritorio\MetusaStock 09-12-05';
query1.sql.add('Select importe from cuen01 where cclie=:Codigo and NO_FACTURA=:NO_FACTURA');
query1.ParambyName('Codigo').AsString:='VA004';
query1.ParambyName('NO_FACTURA').AsString:='F049944';
query1.Open;