while not Qrycons.Eof do Begin If ((Qryconstotal mod 30)=0) then Begin showmessage ('ok'); end; end;
Tente a sintaxe acima. Deve resolver Abraços Marco Aurélio _____ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de leo rodrigues Enviada em: quinta-feira, 16 de fevereiro de 2006 10:14 Para: grupo delphi Assunto: [delphi-br] função mod estou com a seguinte sintaxe: while not Qrycons.Eof do Begin If mod((Qryconstotal)/30)=0 then Begin showmessage ('ok'); end; end; esta dando esta mensagem [Error] Unit1.pas(42): Expression expected but 'MOD' found no help não traz nenhum exemplo de sintaxe o que estou fazendo de errado? --------------------------------- Yahoo! doce lar. Faça do Yahoo! sua homepage. [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE <http://br.ard.yahoo.com/SIG=12f02cu7a/M=396547.7942355.8808049.2369893/D=br clubs/S=2137111264:HM/Y=BR/EXP=1140102867/A=3291957/R=2/SIG=154bf6ok5/*http: /lt.dell.com/lt/lt.aspx?CID=11305&LID=309989&DGC=BA&DGSeg=DHS&DURL=http://ww w1.la.dell.com/content/products/category.aspx/desktops?c%3dbr%26l%3dpt%26s%3 ddhs> <http://br.i1.yimg.com/br.yimg.com/i/br/ads7/100206_y300x250feb10_dhs_dim515 0.gif> _____ Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]> * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do <http://br.yahoo.com/info/utos.html> Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html