Entwickler-Ecke

Windows API - automat fürs klicken


Trainman - Do 29.06.06 18:12
Titel: automat fürs klicken
hallo,

habe eine frage. ich hab ein programm, das in trayicon minimiert. jetzt soll er von da aus auf das desktop klicken. könnt ihr mir sagen wie? und vllt auch soll das programm auch eingaben machen können. also was schreiben.

thx


loetmann - Do 29.06.06 19:57

Hallo,

ich habe gerade eine Art VNC gebastelt:



Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
 SetCursorPos(klickX, klickY); //Mascursor an Position setzen

 // Linke Maustaste simulieren
 mouse_event(MOUSEEVENTF_LEFTDOWN, 0000);
 mouse_event(MOUSEEVENTF_LEFTUP, 0000);


{
// Simulate the right mouse button down
// Rechte Maustaste simulieren
mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);

// Simulate a double click
// Einen Doppelklick simulieren
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
GetDoubleClickTime;
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
   }


ein Gruß


Trainman - Fr 30.06.06 20:06

ok, probier ich mal aus. und weißt du wie das prog selber in edit2 von anderen programmen eingibt? das wäre dann optimal


loetmann - So 02.07.06 12:45

Hallo,

nein, aber entweder brauchst Du das Handle des Programmes und dann das der Eingabobox oder Du versuchst es mit Tastendrucksimmulation. Zu erst ein Mausklick auf die Box und dann schickst Du die Eingabe hin.

Bsp, sendet an eine Applikation mit Handel apphnd den Buchstaben 'A':

Delphi-Quelltext
1:
SendMessage(apphnd, WM_CHAR, Word('A'), 0);                    


Aber die Antwort findest Du bestimmt über die Suche.

Ein Gruß


Trainman - Do 06.07.06 17:43

ok, danke dir sehr. suche mal danach.