folder Tahribat.com Forumları
linefolder Visual Basic - Basic - PicBasic ve Türevleri
linefolder Visual Basicte Fareyi Delirtme



Visual Basicte Fareyi Delirtme

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    holocaust
    holocaust's avatar
    Kayıt Tarihi: 11/Eylül/2005
    Erkek
    Sora Bi Module ekleyin
    form üzerine 1 adet timer ekleyin ve intervalini 50 yapın
    programı durdurmak için CTRL+PAUSE Tuşlarına birlikte basın :D

    'BURASI MODULE YAZILACAK

    Type PointApi
    x As Long
    y As Long
    End Type
    Global FareXY As PointApi
    Declare Function GetCursorPos Lib "user32" (lpPoint As PointApi) As Long
    Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long

    'BURASI FORMUN KOD SATIRINA YAZILACAK

    Private Sub Timer1_Timer()
    Randomize
    x = Rnd(50) * 255
    y = Rnd(30) * 255
    Z = SetCursorPos(x, y)
    End Sub


    ' Sorunlarınız İçin Holocaust@w.cn adresine mail atabilirsiniz.... The_HoloCaust_®
    Holocaust The Late Night Hacker
    Reply With Quote Alıntı yap
Toplam Hit: 1511 Toplam Mesaj: 1