RE: [DUG] Date conversions

Thu, 17 Jun 2004 18:08:42 -0700

Title: Message

I can’t guarantee the format, only that it will be a human readable date. No matter, I’ll just work around it .

 

Thanks,

Dave.

 

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED]
Sent: Friday, 18 June 2004 12:33 p.m.
To: [EMAIL PROTECTED]
Subject: RE: [DUG] Date conversions

 

If it is always going to be that format you can.

 

Remove the first 5 chars and call VarToDateTime.

 

procedure Tform1.Button1Click(Sender: TObject);

var

  lDT: TDateTime;

  lDStr: String;

begin

  lDStr := 'Fri, 18 Jun, 2004';

  lDStr := Copy(lDStr, 6, Length(lDStr));

  lDT := VarToDateTime(lDStr);

  TButton(Sender).Caption := FormatDateTime('dd mmm yyyy', lDT);

end;

-----Original Message-----
From: David O'Brien [mailto:[EMAIL PROTECTED]
Sent: 18 June 2004 10:08 AM
To: NZ Borland Developers Group - Delphi List
Subject: [DUG] Date conversions

Hi all,

 

Is there any easy way of converting a date string into a TDate?

 

i.e. "Fri, 18 Jun, 2004"

 

Dave.

_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi

Reply via email to