델파이
[델파이]시스템 시간 가져오기
노란채송화
2012. 2. 8. 10:08
usesDateUtils;
var
NowDateTime : TDateTime;
NowDateTime := IncSecond(Now,10);
NowDateTime := IncMinute(NowDateTime,1);
NowDateTime := IncMinute(NowDateTime,1);
BatchTimeEdit.Text := FormatDateTime('HHMM',NowDateTime);
sPacBatchTime := FormatDateTime('YYYYMMDD',Now) + Trim(BatchTimeEdit.Text);