Sei que não devia me meter, mas as vezes usar a ajuda do Delphi pode ser bem
produtivo. IsEmpty e IsNull são funções documentadas no Help de qualquer versão
do Delphi.
Sempre é importante ter em mente quais variações de comandos podem existir e
verificar se elas existem e podem ajudá-lo.
Sds,
Ricardo.
Ricardo Souza <[EMAIL PROTECTED]> escreveu:
João, muito obrigado por passar essa instrução. Vou fazer o teste para ver
se funciona. Mas, de antemão, creio que vai funcionar! Agradeço pela
objetividade na resposta, procurando, acima de tudo, auxiliar seu
semelhante.
Deus te abençoe.
Em 02/06/07, Joao Morais <[EMAIL PROTECTED]> escreveu:
>
> ricardo_sx wrote:
> > amigos, boa noite. foi-me ensinado usar a instrução select max
> > (codigo) as cod from sacramento para retornar o código máximo de uma
> > tabela. quando faço isso no delphi não gera problema quando eu
> > realmente tenho registro na tabela, mas quando eu não tenho ele
> > critica dizendo que não pode converter o valor null para string.
> > segue um pedaço de código para poder ilustrar:
> > sqlsacramento.sql.add(´select max(codigo) as cod from sacramento´);
> > sqlsacramento.open;
> > texto:=sqlsacramento[´cod´]; **
>
> var
> VField: TField;
> VCod: Integer;
> begin
> VField := SQLSacramento.FieldByName('cod');
> if VField.IsNull then
> VCod := 1
> else
> VCod := VField.AsInteger + 1;
>
> --
> Joao Morais
>
> > ** nessa linha gera o erro que citei anteriormente porque é
> > retornado null.
> >
> > o que fazer para corrigir esse problema? eu uso interbase e os
> > componentes (tibdatabase, tibtransaction, tibquery, tibupdatesql)
> >
> > já tentei testar da seguinte maneira:
> > if (sqlsacramento.isempty) then
> > ....
> > else
> > ....
> >
> > só que isso ainda assim gera problema. preciso de algo que teste se
> > está nulo o retorno ´cod´.
> >
> > existe alguma forma de conseguir testar se é valor nulo ou não?
> >
> > (delphi 7 + interbase 6)
> >
> >
> >
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
---------------------------------
Novo Yahoo! Cadê? - Experimente uma nova busca.
[As partes desta mensagem que não continham texto foram removidas]
