Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 팁&트릭
Delphi Programming Tip&Tricks
[50] UNIX 시간을 PC시간으로 변환하기
civilian [civilian] 6918 읽음    2004-04-16 11:11
UNIX는 시간을 정수형으로 다루며, 기준이 되는 시점은 1970년 1월 1일 0시입니다.
즉, 0 = 1970.01.01 00:00:00 이죠.

아래 함수는 UNIX의 날짜&시간 값을 받아서 DELPHI의 TDateTime 형으로 변환합니다.
주의해서 봐야 할 것은 우리나라는 GMT기준 시간에서 +9시간 이므로 그만큼
보정을 해주어야 한다는 점입니다.

function Unix2PCTime(const UnixTime: LongInt): TDateTime;
const
  SecInDay = 86400;  // 24 Hours * 60 Mins * 60 Secs = 86400초(하루의 초수)
  GMTKorea = 32400;  //  9 Hours * 60 Mins * 60 Secs = 32400초(9시간의 초수)
var
  StartingDate:   TDateTime;
  NumOfDaysSince: Double;
begin
  StartingDate   := EncodeDate(1970, 1, 1);
  NumOfDaysSince := (UnixTime + GMTKorea) / SecInDay;
  Result         := StartingDate + NumOfDaysSince;
end;
허허허허 [devilsword]   2004-05-13 22:50 X
허허.. 여기에 글이 올라와 있었군요... 근데 UnixToDateTime이라는 함수가 있더군요... 저는 그걸로 했습니다....

+ -

관련 글 리스트
50 UNIX 시간을 PC시간으로 변환하기 civilian 6918 2004/04/16
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.