Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Czy w visualu mozna wstawic PAUZE?
Ravender




Typ: neutral
Postów: 30
Zarejestrowany: Feb 2005
Czy w visualu mozna wstawic PAUZE?

W moim projektcie potrzebuje wykonac 30 tych samych czynnosci co 15ms. Z pewnych wzgledow odpada mozliwosc wykorzystania timera. Czy istnieje w VB mozliwosc wstawienia PAUZY 15 ms ?

26-02-2005 01:20
Pokaż profil Ravender  Wyślij email do Ravender   Odwiedź stronę Ravender       2854667
marcin_an
Forumowicz




Typ: neutral
Postów: 1265
Zarejestrowany: Mar 2004


Dim t As Double

Do While t > Timer - 0.015
    DoEvents
Loop
t = Timer


Timer można tutaj zastąpić funkcją API: GetTickCount, nie będzie miała błędów w okolicach północy.


_____________________________________________
Jedzonko dla Google'a:
Forum na temat Visual Basic, C, C++, Pascal, Programowanie, API, PHP, VBA, VB.NET, QBasic, VBScript, Komputery
Moja strona o wszystkim

26-02-2005 10:05
Pokaż profil marcin_an  Wyślij email do marcin_an   Odwiedź stronę marcin_an  
Ravender




Typ: neutral
Postów: 30
Zarejestrowany: Feb 2005

Podobne rozwiazanie czesto stosowalem na komputerach Commodore. . Myslalem, ze tak jak w qbasicu takze w visualu istnieje jakas sensowna pauza... Twoje rozwiazanie na moim kompie (athlon 2400+) nie daje zadnego widocznego rezultatu. Ale wiem do czego zmierzasz wiec jeszcze pokombinuje z timerem.

26-02-2005 12:26
Pokaż profil Ravender  Wyślij email do Ravender   Odwiedź stronę Ravender       2854667
bisiek




Typ: neutral
Postów: 487
Zarejestrowany: Jul 2003

Możesz też użyć sleep

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)


sleep 15


_____________________________________________
www.mob.abc.pl - moja strona o VB

26-02-2005 12:45
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
Ravender




Typ: neutral
Postów: 30
Zarejestrowany: Feb 2005

Dzieki bisiek.. DOKLADNIE o takie cos mi chodzilo .  Uwielbiam to forum !!!

26-02-2005 14:04
Pokaż profil Ravender  Wyślij email do Ravender   Odwiedź stronę Ravender       2854667
Wszystkich odpowiedzi: 4 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1