Re: Can u answer for strange problem??

hi..
it is 4 digit and i tried like this
begin
s:= Edit1.text;

if FormatDateTime('dd,mm,yyyy',StrToDateTime(s)) = FormatDateTime
('dd,mm,yyyy',StrToDateTime('01/01/0001')) then
 ShowMessage(' Valid Date');

end;

still it giving the same problem


--- In [email protected], "Andrew Muir" 
<armuir@b...> wrote:
> Is your regional settings on your pc set to 2 digit years ?
>   ----- Original Message ----- 
>   From: cstakdk 
>   To: [email protected] 
>   Sent: Friday, July 25, 2003 5:15 PM
>   Subject: [Delphi] Can u answer for strange problem??
> 
> 
>   Please execute this code
> 
>      if StrToDate(Edit1.Text) = StrToDate('01/01/0001') then
>        begin
>         ShowMessage('Valid Date');
>        end;
> 
>   give a value to the edit box 01/01/0001
> 
>   You will get the message 'Valid Date'
> 
>   give a value to the edit box 01/01/2001
> 
>   Again you will get the message 'Valid Date'. 
> 
>   Strange for me... anything wroning in this code
> 
>   cstakdk
> 
> 
> 
>         Yahoo! Groups Sponsor 
>               ADVERTISEMENT
>                 
>        
>        
> 
>   CodeCoffer - new Delphi code protection Tool!
>   http://www.delphicollection.com/public/CodeCoffer.htm
>   ---------------------------------------------------------------
>   Unsubscribe:[email protected]
>   List owner:[email protected]
>   --------------------------------------------------------------- 
> 
>   Your use of Yahoo! Groups is subject to the Yahoo! Terms of 
Service. 
> 
> 
> 
> [Non-text portions of this message have been removed]


------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges & Refill Kits for Your Epson at Myinks.com
Free shipping on orders $50 or more to the US and Canada.
http://www.c1tracking.com/l.asp?cid=5705&lp=home/epson.asp
http://us.click.yahoo.com/brYXfA/_xWGAA/ySSFAA/i7folB/TM
---------------------------------------------------------------------~->

CodeCoffer - new Delphi code protection Tool!
http://www.delphicollection.com/public/CodeCoffer.htm
---------------------------------------------------------------
Unsubscribe:[email protected]
List owner:[email protected]
--------------------------------------------------------------- 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/