Unit Dte2wkno |
------------------------------------------------------------------------------- A unit that calculates the week number from a given date. written by: address: Hans G. Jorgensen, Herregaardsveien, 3745 Ulefoss, Norway. e-mail: hans.g.jorgensen@hit.no or hans.g.jorgensen@tdh.no irc: Franze. See u at #Delphi :) Readme: According to reliable sources this unit is supposed to be correct, but use it on your own risk. I DO NOT guarranty that it calculates the correct week number. This unit may be used in commercial programs. U can freely copy this unit as long as u don't charge any money and keep this heading. If u improve any part of the code, I would be glad for a copy. I also love postcards (hint). My address is above. This is not a VCL so don't install it. Just put the unit in your path (C:\DELPHI\LIB is a good place) or the directory of your project and add it to your project (use project manager). I didn't feel it was neccessary to make this as a VCL, since there would be only one property (date) and one method (function Date2WeekNumber(sDate: String): Integer;) and no event's (maybe BeforeCalculate, AfterCalculate and OnError). If u want this unit as a VCL, mail me and I'll convert it. version 1.0: Initial release. -------------------------------------------------------------------------------
Classes |
Functions |
Date2WeekNumber - I chose to send the date as a string, since I was working with a stringgrid.
Types |
Constants |
Variables |
Functions |
Types |
Constants |
Variables |