ďťż

Ładny brzuch

W jaki sposób można wyłuskać aktualną date, ale nie na podstawie daty systemowej tylko jakiegoś zewnętrznego źródła.



ta np. zczytać z zegarka stojącego obok monitora...

zdefiniuj "zewnętrzne źródło" to się zobaczy


ta np. zczytać z zegarka stojącego obok monitora...

zdefiniuj "zewnętrzne źródło" to się zobaczy

a o internet time service nie slyszal? jak nie to ciiii


ta np. zczytać z zegarka stojącego obok monitora...

Zabawne, nie wiem czy mam się śmiać czy płakać.


zdefiniuj "zewnętrzne źródło" to się zobaczy
Dowolne (wiarygodne).


a o internet time service nie slyszal? jak nie to ciiii
Nie słyszał, a wygoogleć się nie dało (w kontekście delphi). Więc jakieś konkrety? :)
Użytkownik podrurznik edytował ten post 11 listopad 2006, 21:31


Kliknij 2x na zegarku i przejdz do zakladki 'czas z internetu' - masz 2 serwery czasu, wystarczy poszukac o ich obsludze.

Przy laczeniu sie z serwerem time.windows.com firewall wyrzucil mi ze jego ip to 207.46.232.189, laczy sie na porcie 123 (NTP - Network Time Protocol).
Stad juz chyba w miare prosta droga, co? :)


Nie słyszał, a wygoogleć się nie dało (w kontekście delphi). Więc jakieś konkrety? :)
i kto to mówi :P a wygooglać o indy się nie chciało? :P

http://www.vclcompon...ditor-info.html


Kliknij 2x na zegarku i przejdz do zakladki 'czas z internetu' - masz 2 serwery czasu, wystarczy poszukac o ich obsludze.

Przy laczeniu sie z serwerem time.windows.com firewall wyrzucil mi ze jego ip to 207.46.232.189, laczy sie na porcie 123 (NTP - Network Time Protocol).
Stad juz chyba w miare prosta droga, co? :)

omg, ale mi chodzi o to jak to oprogramować w delphi, a nie dla ogólnej informacji :lol:

Może łatwiej będzie ściągnąć http://www.worldtime...time_in_PL.aspx lub http://www.timeandda...city.html?n=262 i przefiltrować :)

A co mi tam:uses urlmon; procedure TForm1.Button1Click(Sender: TObject); var p, c, f:string; t:tstringlist; begin p:=ExtractFilePath(ParamStr(0))+'czas.txt'; URLDownloadToFile(nil,'http://www.worldtimeserver.com/current_time_in_PL.aspx',PChar( p),0,nil); t:=tstringlist.Create; t.LoadFromFile(p); c:=t.Text; c:=copy(c,pos('<div id="analog-digital"><font size="7">',c)+40,8); if pos('PM',c)>0 then begin f:=inttostr(strtoint(copy(c,1,2))+12); c[1]:=f[1]; c[2]:=f[2]; setlength(c,5); end; caption:=c; t.Free; deletefile(p); end;
Użytkownik Cyrkiel edytował ten post 12 listopad 2006, 23:44

a o internet time service nie slyszal? jak nie to ciiii
a jak gość nie ma internetu to co?

Wtedy pozostaje mu zegarek obok komputera :D
Bez internetu raczej się nie sczyta daty niż systemowa (jest jeszcze czas z BIOSu ale chyba system z niego korzysta)...


omg, ale mi chodzi o to jak to oprogramować w delphi, a nie dla ogólnej informacji :lol: Jak masz specyfikacje to jaki problem napisac program? <_<
Ja wiem, najlatwiej poprosic o gotowca. :P

Bez internetu raczej się nie sczyta daty niż systemowa (jest jeszcze czas z BIOSu ale chyba system z niego korzysta)... Chyba raczej na pewno z niego korzysta, bo skads musi wiedziec jaki jest czas, bo wiecznie nie dziala zeby sam sobie odliczal... ;)

Dzięki cyrkiel, przydało się ;)

P.S wojewoda ogarnij sie zamiast spamować

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
  •