Jak w prosty sposób zmienić datę systemową?

0

Bardzo proszę o pomoc w tej sprawie. Jak można zmienić datę systemową z Delphi5?Wprawdzie w pomocy Delphi znalazłem funkcje związane z SYSTEMTIME, ale nie za bardzo wiem jak je wykorzystać w praktyce.--Delphi 5 Standard & Delphi 6 Personal & Delphi 6 Enterprise

0

if ((edit1.text=)or(edit2.Text=)or(edit3.Text=''))then
showmessage('Pola muszą być wypełnione!')
else
Data.wMonth:=StrToInt(edit1.Text);
Data.wDay:=StrToInt(edit2.Text);
Data.wYear:=StrToInt(edit3.Text);
SetLocalTime(Data);

Edity to ofkors pola do wpisania daty
Edit1=Miesiąc
Edit2=Dzień
Edit3=Rok

jak cośnie zadziała to w sekcji USES dorzuć ShellApi, ale ni ejstem pewnien czy coś trzeba dorzucać a jeżeli tak to co...

[email protected]
POZDRAWIAM
DELPHI RULEZ
NIECH MOCz BĘDZIE Z WAMI
:-))

0

var DATA:slSystemTime;// :)--eh ah i oh

0

Wielkie dzięki za odpowiedzi na moje pytanie :-) --Delphi 5 Standard & Delphi 6 Personal & Delphi 6 Enterprise

1 użytkowników online, w tym zalogowanych: 0, gości: 1