MyCity » Pascal -> Delphi » Milisecond funkcija

Milisecond funkcija

Napisano na dan: 22.5.2007

Milisecond funkcija
Sledeća strana Pagination

Idi na vrh

Poslao: 22 Maj 2007 23:43
Idi na vrh
offline
  • Keeg 
  • Novi MyCity građanin
  • Pridružio: 31 Mar 2007
  • Poruke: 11

Kako napraviti da izmjerim interval izmedju pritiska i otpuštanja tipke (u milisekundama, of kors)?



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 22 Maj 2007 23:54
Idi na vrh
offline
  • Đuro Glumac
  • dipl. ing. informatike
  • Pridružio: 08 Feb 2004
  • Poruke: 3640
  • Gde živiš: ApAtIn

Pogledaj proceduru DecodeTime.

procedure DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word);

Tebi znaci treba poslednja vrednost, to su milisekunde trenutnog vremena. Nakon otpustanja tastera ponovo uradis ovo i od tog vremena oduzmes prethodno, s tim da sve konvertujes u MSec ako je taster bio pritisnut duzi period.



Poslao: 23 Maj 2007 00:39
Idi na vrh
offline
  • Srđan Tot
  • Pridružio: 12 Jul 2005
  • Poruke: 2483
  • Gde živiš: Ljubljana

Preporucio bih ti da koristis high performance counetr-e. Vise o njima mozes ovde pronaci:
[Link mogu videti samo ulogovani korisnici]
[Link mogu videti samo ulogovani korisnici]

Ako ti je to previse precizno, mozes koristiti GetTickCount funkciju:
[Link mogu videti samo ulogovani korisnici]

Poslao: 23 Maj 2007 01:05
Idi na vrh
offline
  • Pridružio: 08 Jan 2007
  • Poruke: 279
  • Gde živiš: Srbija

var   Start: Cardinal; begin   Start := GetTickcount;   Sleep(300);   ShowMessage(Inttostr(GetTickcount - Start)); end;
Možeš iskoristiti i funkciju MilliSecondsBetween(StartTime, EndTime), s tim što moraš deklarisati (StartTime, EndTime) - dodeliti vrednosti, u klauzuli uses potrebno ti je još DateUtils.
   StartTime := Now();    Sleep(300);    EndTime := Now();    ShowMessage(IntToStr(MilliSecondsBetween(StartTime, EndTime)));

Poslao: 23 Maj 2007 13:06
Idi na vrh
offline
  • Emil Beli
  • Pridružio: 03 Jan 2005
  • Poruke: 2990
  • Gde živiš: Beograd

Mozes i GetTickCount, to je sigurniji metod jer je najprecizniji.. znaci zapises tick na pritisku, na pustanju pa ih oduzmes.

MyCity » Pascal -> Delphi » Milisecond funkcija

Ko je trenutno na forumu
 

Ukupno su 1930 korisnika na forumu :: 33 registrovanih, 3 sakrivenih i 1894 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 6018 - dana 19 Dec 2025 13:41

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: A.R.Chafee.Jr., Baždaranac, Bbbggg1979, Bobrock1, brandža84, BUDDAR70, Darko8, dekir, Dimitrise93, djonsule, farabut, icemilos, Istman, jalos, karjatid, klepesina, kutija11, Lazarus, maCvele, mir, N.e.m.a.nj.a., Naj-Turs, RajkoB, RED4G-304, redstar011, Szigetwar, TBoy, Trimi68, voja64, zeka013, zeo, zlatkoa987, ZZZ