Ich habe ein Programm mit Textfeldern, die man über die WinAPI
nicht finden und ansprechen kann.
Daher bewege ich die Maus mit SetcursorPos_ an die Position des Text-Gadgets. Dann führe ich mit
Code: Alles auswählen
#MOUSEEVENTF_LEFTDOWN = $2
#MOUSEEVENTF_LEFTUP = $4
Procedure MouseEvent(Ereignis.l)
Mem.l=GlobalAlloc_(0,8)
GetCursorPos_(Mem)
mouse_event_(Ereignis|#MOUSEEVENTF_ABSOLUTE,PeekL(Mem)*($FFFF/GetSystemMetrics_(0)),PeekL(Mem+4)*($FFFF/GetSystemMetrics_(1)),0,GetMessageExtraInfo_())
GlobalFree_(Mem)
EndProcedure
SetCursorPos_(100,100)
MouseEvent(#MOUSEEVENTF_LEFTDOWN)
MouseEvent(#MOUSEEVENTF_LEFTUP)
Nun möchte ich die Taste [Entf] bzw. deren Funktion ausführen lassen. (Möchte den Inhalt des Textfeldes löschen)
Blos wie kann ich dies bewerkstelligen?
Andere Möglichkeit: Wenn ich mit dem oben beschriebenen Code
den Textcursor in das Textfeld gesetzt habe, wird durch das Programm
ein neues handle erstellt. Damit könnte ich jetzt endlich das Textfeld
ansprechen!
Blos wie kann ich nun den Text aus diesem Textfeld auslesen bzw. ändern?
Hat jemand ein Codebeispiel in PB oder WinAPI ?
Danke.
Dr. Pixel