여기 남기석님의 올리신 글이 있더군요.. 참고하세요..

================================================================================

// PC의 날자와 시간을 변경한다.

// sDate : 년월일 8자리

// sTime : 시분초 6자리 입력

procedure TForm1.prcReplaceDateTime( sDate:string; sTime:string );

var

iYYYY, iMM, iDD, iHH, iNN, iSS : integer;

Present : TDateTime;

SystemTime : TSystemTime;

begin

iYYYY := strtoint(copy(sDate,1,4));

iMM := strtoint(copy(sDate,5,2));

iDD := strtoint(copy(sDate,7,2));

iHH := strtoint(copy(sTime,1,2));

iNN := strtoint(copy(sTime,3,2));

iSS := strtoint(copy(sTime,5,2));

Present := EncodeDate( iYYYY, iMM, iDD ) + EncodeTime( iHH, iNN, iSS, 0 );

DateTimeToSystemTime( Present, SystemTime );

SetLocalTime( SystemTime );

end;



이렇게 하시면 바뀝니다....



저 같은 경우는 프로그램 시작시마다

서버에서 시간을 받아 바꾸도록 해 놨습니다.



================================================================================



정영식 wrote:

> DataTimePicker Component에 관련된 질문입니다…

>

> DataTimePicker Component에서 콤보버튼을 누르면 달력이 하나 나오고, 그밑에

>

> [오늘: 01-08-09’]이처럼 년월일 나오는데 오늘: 01-08-09’를 변경할 수 없나요

> …

> 보통 이런 질문을 하면 Date Property를 변경하라고 하는데요…

>

> 이 명령어는 선택되는 일자를 변경하는 명령어 인걸로 알고있습니다…

>

> DateTimePicker1.Date := StrToDate(‘20010809’);

>

> 오늘 날짜로 Setting되는 날짜는 Client Computer의 System 날짜인것 같은데요…

>

> 저는 Server의 System Date를 사용하고 싶습니다…

>

> 방법을 갈켜 주세요…

>

> 방법이 없다면…

>

> Client Computer의 System 날짜를 변경하는 함수가 존재하는지요…

>

> 아님… ‘ 오늘: 01-08-09’표시를 없엘수 있는 방법은 없는지요…

>

> 갈켜주세요…

>

> 부탁드립니다.

>

> 참고로 저는 지금 Delphi3.0에 Oracle 8.0.5를 사용중입니다…

>

>