[firebase-br] FB 2.1

Anderson Piccoli adpiccoli em gmail.com
Ter Fev 3 11:45:27 -03 2009


Qual erro o delphi acusa?

On Tue, Feb 3, 2009 at 11:38 AM, Renato Miranda
<renato.smiranda em gmail.com>wrote:

> Senhores,
>
> Alguém saberia dizer porque o código abaixo não funciona no FB 2.1 ?
> Funciona perfeitamente no FB 1.5 e no IBExpert (o SQL).
>
> Delphi 7 / DBXPress
>
> function TdmPsw.fPegaQtdSis: integer;
>  var sql: TSQLDataSet;
> begin
>  try
>    sql := TSQLDataSet.Create(nil);
>    sql.CommandType   := ctQuery;
>    sql.SQLConnection := dmBase.sqlConBase;
>    sql.Close;
>    sql.CommandText := 'SELECT COUNT(*) FROM WSISNOMES';
>    sql.Prepared := False;
>    sql.Open;
>    if sql.Eof then
>      Result := 0 else
>      Result := sql.FieldByName('COUNT').AsInteger;
>  finally
>    sql.Free;
>  end;
> end;
>
>
> --
> Abraços,
>
> RMiranda
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>



Mais detalhes sobre a lista de discussão lista