well..du kan faktisk ikke køre på screen(så vidt jeg ved), men du kan finde ud af hvilken dc der \"ejer\" den pixel...eksempel her:
Private Declare Function WindowFromPoint Lib \"user32\" (ByVal xPoint As Long, ByVal yPoint As Long) As Long Private Declare Function GetPixel Lib \"gdi32\" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long Private Declare Function GetDC Lib \"user32\" (ByVal hwnd As Long) As Long Public x
Private Sub Timer1_Timer() window = WindowFromPoint(433, 7) windowdc = GetDC(window) PixelColor = GetPixel(windowdc, 1, 1) If PixelColor <> -1 Then Me.BackColor = PixelColor Me.Caption = x End Sub
ved godt at det 1,1 ikke er korrekt...men jeg gider ikke til at lave den skal hente hvor på skærmen vinduet er placeret og så regne kordinatet ud fra det for 30 points...
Well .. thank you :-) Jeg ka jo ikke tvinge dig til at tage imod dem ;-) Vil sq ik af med en lunge ... sygehus og mig går ik helt i spind ;o)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.