licznik czasu - za pewne proste pytanie

Witam!!!!!!!

Potrzebuję zrobić bardzo prościutki i krótki program do testowania szybkości pisania na klawiaturze. Potrzebuję zrobić coś takiego, żeby po 60 sekundach od momentu jakiegoś zdarzenia (np wciśnięcia przycisku) nastąpiło inne i żeby przez owe 60 sekund można było swobodnie wprowadzać tekst do pola edycji.

Is there anyone who can help me??? I'll be gratefull.

hmm... hmm... hmm... hmm... hmm... hmm... hmm... --&lt&lt------- PZDR -------&gt&gt
//*/
Żeby nie wiem co, to ja i tak nie wiem nic.
*///

Sprobuj uzyc komponentu Timer.--Pozdrawiam
Ojciec (Delphi/C++)

jesli ma byc srednia, to ttimerek, i po 60 sekudnach obliczasz srednia stukniec przez czas ( no a w onkeypress tez robisz Inc(zmienna)ofk). A szybkosc pisana na klawiatusze to robisz w onkeypress to samo co przedtem tylkoze srednia nie po 60 sekundach a po np. 1 --Vroc
&ltDelphi Knight&gt

no.... dzięki za zainteresowanie, ale ogólnie zdarzenia związane z czasem są mi dość mało znane. Mimo iż co nie co się już w tym Delphi stworzyło (od 2 lat). Coś mi zaczyna świtać, ale jeżeli mogę prosić o jakiś przykład, fragment kodu czy coś podobnego, to również byłbym wdzięczny. Na razie mimo wszystko nie wiele kojarzę.
hmm... hmm... hmm... --&lt&lt------- PZDR -------&gt&gt
//*/
Żeby nie wiem co, to ja i tak nie wiem nic.
*///

Mozna tez oprogramowac wątek który jest powtarzany np co 1ms i w tym czasie jest sparwadzane udezenie, a takze zwiekszana wartosc zmiennej odpowiedzialnej za zliczanie czasu.

cepa napisał:
Mozna tez oprogramowac wątek który jest powtarzany np co 1ms i w tym czasie jest sparwadzane udezenie, a takze zwiekszana wartosc zmiennej odpowiedzialnej za zliczanie czasu.

Tylko, że jak on nie może timera opanować to z wątkami raczej lepiej nie zaczyna.

A tak apropos mierzenia szybkości pisania na klawiaturze to w większości profesjonalnych programów mierzących szybkość mierzy się w słowach na minutę (6 znaków = jedno słowo) lub w word per minute (5 znaków = jedno słowo), a nie w znakach na minutę :)--Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.

Pomoc do Delphi po polsku. http://www.4programmers.net/forum/index.php?action=show&id=21335&c=2

Oficjalny kanał IRC serwisu 4programers:
serwer: warszawa.ircnet.pl sieć: POLNet kanał: #4programmers.net

Na forme wstaw
Labela
Buttona
Timera właściwość Enablet ustaw na False

Reszta poniżej

var
Form1: TForm1;
Czas: TTime; //Tu jest dodana zmienna

implementation

{$R *.DFM}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := TimeToStr(Czas - Now);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
If Button1.Caption = 'Stop' Then
Begin
Button1.Caption := 'Start';
Timer1.Enabled := False;
end
else
Begin
Button1.Caption := 'Stop';
Czas := Time;
Timer1.Enabled := True;
end;
end;--Pozdrowienia dla całego FORUM !!!

Marco_99