Tenho que verificar se e ano bissexto para executar algumas funcionalidades no sistema, estou fazendo a pergunta dessa forma abaixo, mas não esta dando certo, não da erro nenhum, so não retorna o correto.
if (ano mod 4 = 0) and (ano mod 100 = 0) and (ano mod 400 = 0) then
Pergunta
Alessandra (Jundiai)
Tenho que verificar se e ano bissexto para executar algumas funcionalidades no sistema, estou fazendo a pergunta dessa forma abaixo, mas não esta dando certo, não da erro nenhum, so não retorna o correto.
if (ano mod 4 = 0) and (ano mod 100 = 0) and (ano mod 400 = 0) then
anobi := true
else
anobi := false;
Link para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.