Código Delphi [-] f := EncodeDate(2011,6,13); showmessage(datetostr(f));
f := EncodeDate(2011,6,13); showmessage(datetostr(f));