Descobrindo se o sistema está usando 4 dígitos no ano
Código
{ Para não correr o risco de surpresas desagradáveis, é melhor que seu programa em Delphi verifique se o Windows está ajustado para trabalhar com 4 dígitos para o ano. Assim seu programa pode alertar o usuário quando o ano estiver sendo representado com 4, ou outro formato}
function Is4DigitYear: Boolean; begin
result:=(Pos('yyyy',ShortDateFormat)>0); end;
Publicidade
Vote na dica
Quantidade de votos: 0 votos Aceitação:0%
Detalhes da dica
Categoria: Data e hora Adicionada dia: 20/12/03 Por: Cláudio F. Pirasol Visualizada: 3277 vezes