kkuzil.own@gmail.com

Posted
Filed under Development/Delphi

1. 우리나라 날짜 포맷
ShortDateFormat := 'YYYY-MM-DD';
DateSeparator   := '-';

2. 일본 날짜 포맷
ShortDateFormat := 'YYYY/MM/DD';
DateSeparator   := '/';


TimeSeparator := ':';
LongTimeFormat := 'hh:mm:ss';




function StrToDateTimeDef2(const S: string; const Default: TDateTime): TDateTime;
var
FormatSettings: TFormatSettings;
begin
FormatSettings.DateSeparator := '-';
FormatSettings.ShortDateFormat := 'yyyy-mm-dd';
FormatSettings.TimeSeparator := ':';
FormatSettings.LongTimeFormat := 'hh:mm:ss';

if not TryStrToDateTime(S, Result, FormatSettings) then
Result := Default;
end;
2012/05/21 11:17 2012/05/21 11:17