Saludos!
Al final lo he hecho mediante IF anidados;
if (not (DataModule.Query1.Locate('param1', Edit1.text, []))
then Application.Messagebox ( 'Error......
else if (not (DataModule.Query1.Locate('param2', Edit1.text, []))
then Application.Messagebox (.....
...
No creo que sea la solución mas eficiente pero me ha parecido la más sencilla y he estado haciendo pruebas i parece que funciona bien.
Muchas gracias a todos por vuestra ayuda e interes!!
|