Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Pomeranje misa na odredjenu koordinatu?

[es] :: Visual Basic 6 :: Pomeranje misa na odredjenu koordinatu?

[ Pregleda: 2149 | Odgovora: 11 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Milan M. Radovic
Web Developer
Pančevo

Član broj: 16959
Poruke: 743
77.46.165.*



+25 Profil

icon Pomeranje misa na odredjenu koordinatu?15.02.2008. u 13:43 - pre 197 meseci
Pomeranje misa na odredjenu koordinatu?
I don't need a girl for sex , All I Need is Binary and HEX
 
Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12850



+4784 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?15.02.2008. u 14:08 - pre 197 meseci
Uzmes pravougaonu podlogu za misa, na donjoj ivici obelezis vrednosti za X osu a na levoj za Y. Nabavis dva laserska pointer-a (one priveske za kljuceve) i zalepis jedan na levu stranu misa (moze selote(j)pom) a jedan na prednju (ispred tastera).
Zatim drzeci misa tako okrenutog da laserski zrak iz pointera na levoj strani bude paralelan sa levom ivicom podloge (koja je, jelde Y osa) pomeras misa dok laserski zraci ne padaju na odgovarajuce koordinate.

Tips & tricks:
-Za lakse namestanje ovog paralelnog polozaja mozes da koristis jos jedan laser na levoj strani (ako stane) koji pokazuje u suprotnom smeru i obelezis X osu i na gornjoj ivici podloge.
-Umesto da obelezavas po podlozi, mozes da zalepis lenjir.
 
Odgovor na temu

stefanpn
Total anonymous
Programer

Član broj: 172809
Poruke: 509
77.46.195.*



+1 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?15.02.2008. u 14:46 - pre 197 meseci
Mislim da je covek mislio na pomeranje kursora na ekranu.

A ako jeste evo odgovora:
Code:

Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long

Private Sub Command1_Click()
       SetCursorPos 100, 100
End Sub


 
Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12850



+4784 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?15.02.2008. u 14:50 - pre 197 meseci
Slazem se, ali neka pita ono sto je mislio a ne ovako. Mogu iz tog pitanja razne stvari da se pretpostave, ja sam samo uzeo najekstremniji primer. Kakvo pitanje - takav odgovor :)
 
Odgovor na temu

stefanpn
Total anonymous
Programer

Član broj: 172809
Poruke: 509
77.46.195.*



+1 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?15.02.2008. u 17:42 - pre 197 meseci
Ma vazno da se mi druzimo....
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
91.148.113.*



+7 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?15.02.2008. u 22:35 - pre 197 meseci
Malo interesantnije ...
Code:

Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Command1_Click()
Dim px As Long
px = 50
While px < 500
       SetCursorPos px, px
       px = px + 1
       Sleep 10
Wend
End Sub

 
Odgovor na temu

stefanpn
Total anonymous
Programer

Član broj: 172809
Poruke: 509
77.46.195.*



+1 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?15.02.2008. u 22:49 - pre 197 meseci
E sad bas da ga fenserisemo...

Code:

Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Command1_Click()
Dim MaxX As Integer
Dim MaxY As Integer
MaxX = Screen.Width / Screen.TwipsPerPixelX
MaxY = Screen.Height / Screen.TwipsPerPixelY
Dim Px As Integer
Dim Py  As Integer
For Px = 0 To MaxX
       Py = MaxY/2 + MaxY/2 * Sin(Px * 3.14 / 180)
       SetCursorPos Px, Py
       Sleep 5
next Px
End Sub
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
91.148.112.*



+7 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?16.02.2008. u 22:37 - pre 197 meseci

Dobar ti je ovaj kod
 
Odgovor na temu

stefanpn
Total anonymous
Programer

Član broj: 172809
Poruke: 509
77.46.195.*



+1 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?16.02.2008. u 23:13 - pre 197 meseci
Hvala, ali ti si me inspirisao sa tvojim kodom.

Pozz.
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?18.02.2008. u 12:45 - pre 196 meseci
evo i ja da okacim nesto, bilo mi dosadno pa sam resio da pomeram kursor koristeci easing funkcije :)
mada se easing efekti ne vide bas lepo iz razloga sto je kursor mali... a i nije toliko fensi kao pomeranje po sinusu :p

inace, ne znam sto kod nekih easing funkcija se kursor "zalepi" na (0,0) al nikako da zavrsim ovu Easing klasu i da je lepo izdebagujem...
Prikačeni fajlovi
 
Odgovor na temu

stefanpn
Total anonymous
Programer

Član broj: 172809
Poruke: 509
77.46.195.*



+1 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?18.02.2008. u 14:55 - pre 196 meseci
Ja sam nekada davno imao ideju, koju sam znao kako ali me je jednostavno mrzelo da je realizujem ( nije bilo svrhe ). Pa cu je sad podeliti s' vama. Ideja je bila da se na svakih 10 ms snima pozicija kursora u datoteku, dok je ukljuceno snimanje. A da posle na play moze da se rekonstruise pomeranje kursora, ideja je bila da se prati neciji rad sa najmanje moguce snimanja i zauzimanja memorije...

P.S. Sve bi to lepo funkcionisalo da je okruzenje staticko... Ovako nema svrhe jer ako se jedna ikona pomeri sve pada u vodu...

@Ruzicic

Klasa ti je super, samo kao i mojoj ideji ne vidim joj primenu...
Sem ako neces da se dobro nasalis sa nekim.
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: Pomeranje misa na odredjenu koordinatu?18.02.2008. u 19:53 - pre 196 meseci
ma ta klasa nije napisana da bih njom pomerao kursor :) nego da bih imao easing efekte u vb-u ako mi zatreba za neke animacije (a trebalo mi jednom)


e da, i ovde me dosta njih zna pod nadimkom 'krcko' (menjao sam nik ovde na forumu to mi je bio "originalni") mada mozes da me oslovljavas kako hoces :D
 
Odgovor na temu

[es] :: Visual Basic 6 :: Pomeranje misa na odredjenu koordinatu?

[ Pregleda: 2149 | Odgovora: 11 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.