> Edit1.tex := inttostr(QueryCadClyente.fieldbyname('MAX').asInteger+1);
Use Fields[0].AsInteger ou dê um nome para seu campo no SQL
select max(campo) as max_campo from tabela...
e aí:
Edit1.tex := inttostr(QueryCadClyente.fieldbyname('MAX_CAMPO').asInteger+1);
[]'s
Jackson Gomes
Tools&Comps - Controle de Usuários para Desenvolvedores Borland/CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: [EMAIL PROTECTED]
Fone: 27 3389 1138 - 8811 0324
----------------------------------------------------------------------------
Devhost - Webhost para desenvolvedores Borland
http://www.devhost.com.br
[EMAIL PROTECTED]
