Validar resultados de Query

[marcoszorrilla]

No acabo de comprender bien lo que quieres hacer. Según parece la consulta siempre va a traer 2 Registros, y además solamente pueden contener el número 1 ó el 2.

Código Delphi [-]
If Query1.Fields[0].AsInteger = 1 then
ShowMessage('XXXXX');

Si son dos registros,

Código Delphi [-]
Query1.First;

Evaluar como en el ejemplo

Código Delphi [-]
Query1.Next;

Lo mismo
y luego de acuerdo a lo obtenido dar el mensaje que corresponda.....

Un Saludo.