Obtener el resultado de una consulta

[devric]

Buenas... estoy implementando un sistema en Delphi 7 y MySQL 5.0 y tengo la siguiente duda. Sencilla, pero la verdad, busque y no encontre :

Código Delphi [-]
    with DMo.query2 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('select count(1) from agua where id_protocolo=  '+(IntToStr(DMo.T_protocolosid_analisis.Value)));
      DMo.query2.Open;
    end;

Tengo ese código. Como hago para asignar el valor de esa consulta a una variable por ejemplo??

Desde ya muchas gracias!

[ContraVeneno]

Código Delphi [-]
with DMo.query2 do begin
 Close;
 SQL.Clear;
 SQL.Add('select count(1) as contador from agua where id_protocolo=   '+(IntToStr(DMo.T_protocolosid_analisis.Value)));
 Open;
 UnaVariable := FieldByName('Contador').AsInteger;
 //UnaVariable := Fields[1].Value;
end;

[roman]

Otra forma:

Código Delphi [-]
UnaVariable := Fields[0].AsInteger;

// Saludos

[devric]

Muchas gracias muchachos!!

De maravilla