Hi würde dieses script so functionieren und wo muss man Pixel und Fenstergröße eingeben?
Oder habt ihr eine bessere idee wie man nach einem Pixel suchen kann und wenn mann ihn sieht soll er Shift drücken?Quote:
Dim farbe As Integer = 16711680 '<-- z.B. Rot
Dim b As New Bitmap(My.Computer.Screen.WorkingArea.Width, My.Computer.Screen.WorkingArea.Height)
Dim g As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(b)
g.CopyFromScreen(0, 0, 0, 0, New Size(b.Width, b.Height))
For i = 0 To (b.Width - 1)
For j = 0 To (b.Height - 1)
If b.GetPixel(i, j) = Color.FromArgb(farbe) Then
SendKeys.Send("{shift}")
End If
Next
Next