|
| Delphi - getYear = 1899 Fra : Michael |
Dato : 29-11-00 11:47 |
|
Når jeg kalder funktionen getYear regnede jeg med at modtage 2000, men den
returnere 1899, er der nogen der kan give mig et svar på hvorfor?
function TDate.getYear: Integer;
var
y, m, d: Word;
begin
DecodeDate(fDate, y, m, d);
result := y;
end;
--
/md
| |
Lars Bargmann (29-11-2000)
| Kommentar Fra : Lars Bargmann |
Dato : 29-11-00 12:06 |
|
Fordi din fDate er 0 eller derunder, vil jeg tro...
Klippet fra hjælpen :
TDate represents a special type of TDateTime value that has no decimal part.
A TDate value represents the number of days that have elapsed since
12/30/1899.
Lars bargmann
"Michael" <michael@danwebportal.com> wrote in message
news:%95V5.478$V3.54656@news000.worldonline.dk...
> Når jeg kalder funktionen getYear regnede jeg med at modtage 2000, men den
> returnere 1899, er der nogen der kan give mig et svar på hvorfor?
>
> function TDate.getYear: Integer;
> var
> y, m, d: Word;
> begin
> DecodeDate(fDate, y, m, d);
> result := y;
> end;
>
>
> --
> /md
>
>
| |
|
|