본문 바로가기
Delphi Tip/+Tip

한국 표준시간(LGU+서비스) 가져오기 셋팅

by MonoSoft 2022. 1. 21.
728x90
반응형

한국 표준시간(LGU+서비스) 가져오기 셋팅

 

ime.bora.net <<<< LGU+ 에서 제공해주는 한국표준시간 서비스

 

var t_STime : TSystemTime;

t_ITime : String;

begin

IdSNTP1.Host := 'time.bora.net';

IdSNTP1.Port := 123;

//t_ITime := DateTimeToStr(IdSntp1.DateTime);

//edt1.Text := t_ITime;

edt1.Text := FormatDateTime('YYYYMMDDHHNNSS',IdSntp1.DateTime);

 

{GetSystemTime(t_STime);

t_STime.wYear := StrToInt(Copy(t_ITime, 1,4));

t_STime.wMonth := StrToInt(Copy(t_ITime, 6,2));

t_STime.wHour := StrToInt(Copy(t_ITime, 14,2)) - 9;

//GTM(그리니치 표준시)때문에 한국 기준으로 -9

t_STime.wMinute := StrToInt(Copy(t_ITime, 17,2));

t_STime.wSecond := StrToInt(Copy(t_ITime, 20,2));

SetSystemTime(t_STime); }

 

728x90
반응형

'Delphi Tip > +Tip' 카테고리의 다른 글

델파이 개발 버전 알아내기  (0) 2022.01.26
인터넷 연결 체크  (0) 2022.01.24
인터넷 연결상태 체크  (0) 2022.01.20
델파이의 MD5 해싱  (0) 2021.09.17
델파이 폼 모달 TForm modal, modaless show  (0) 2021.09.02

댓글