Como capturar el resultado de una consulta SQL

[Jose Manuel]

Bueno por fin ha funcionado, al utilizar un componente ODAC para acceso a bases de datos Oracle, el código debe ser el siguiente, ya que este componente no devuelve filas:

procedure TfInformacion.Btn_iniciarClick(Sender: TObject);
begin
     OraSQL1.SQL.Clear;
     OraSQL1.SQL.Text := ' Declare'+#13+
                         ' c Integer;'+#13+
                         ' begin'+#13+
                         '    SELECT Count(*)'+#13+
                         '    INTO :c'+#13+
                         '    FROM desarrollo.personal;'+#13+
                         ' end;';
      OraSQL1.Params[0].DataType := ftInteger;
      OraSQL1.Execute;
end;

procedure TfInformacion.OraSQL1AfterExecute(Sender: TObject; Result: Boolean);
begin
      memo1.Lines.Add('Nº de Registros = ' + formatfloat('#,##0',OraSQL1.Params[0].AsInteger));
end;

Gracias a todos por vuestro tiempo.
Un saludo
Jose Manuel García.