|
Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
Turbo Delphi für Win32
|
Re: integer zu word typecast problem
29. Sep 2007, 00:38
Kompiliert bei mir (Delphi 7) ohne Probleme. Aber so lässt es sich vereinfachen:
Delphi-Quellcode:
function isWeekend(ACol:Integer; year, month: word) :boolean;
begin
Result:=DayOfWeek(EncodeDate(year, month, ACol)) in [1, 7];
end;
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
|