Fórum Validar Ano #390196
09/11/2010
0
estou precisando validar o ano pra verificar se o mesmo é valido...
só que não sei como...alguém poderia me ajudar???
Obrigada
Renata Dias
Curtir tópico
+ 0Posts
09/11/2010
Wilson Junior
Gostei + 0
09/11/2010
Jair N.
Existem várias formas diferentes poderia postar qual seria a que voce está querendo.
Gostei + 0
09/11/2010
Eduardo Marcolongo
var dia : tdatetime; ano : integer;begin dia := date; ano := strtoint(formatdatetime('yyyy',dia));end;
Gostei + 0
09/11/2010
Sergio Santos
Boa Tarde
Que tipo de validação vc quer fazer?
Qdo vc diz valido, é relacionado a que condição? BISSEXTO, PERIODO, SECULO?
Segue abaixo um pequeno exemplo de uma função para saber se o Ano é Bissexto ou não.
function anobissexto( fano: integer) : bolean; var Resto : double; Begin
Resto := (fano mod 4); if Resto = 0 then Result := true; else Result := false;
end;
Gostei + 0
09/11/2010
Renata Dias
Gostei + 0
09/11/2010
Sergio Santos
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)