PureBytes Links
Trading Reference Links
|
Then the dh_mo_da_yr function could probably be modified to
something like this.......
dave stanley
{
Function: mo_da_yyyr
returns a string in the form mm/dd/yyyy
}
vars:
yy(0),yyxx(0),yyyy(0);
yy=year(date);
if date>99999 and date<1010000 then begin
if date<1000000 then yyxx=19;
if date>1000000 then yyxx=20;
yyyy=yyxx+yy;
mo_da_yyyr=
numtostr(month(date),0) + "'/" +
numtostr(dayofmonth(date),0) +"/" +
numtostr(yyyy,0);
end:{...99999 to1010000...}
Dennis H's original function.......
{
Function: dh_mo_da_yr
returns a string in the form mm/dd/yy
}
dh_mo_da_yr =
numtostr(month(date),0) + "/" +
numtostr(dayofmonth(date),0) + "/" +
numtostr(year(date),0);
|