AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Tastaturdruck Emulieren

Ein Thema von Pseudemys Nelsoni · begonnen am 20. Sep 2003 · letzter Beitrag vom 16. Jan 2004
Antwort Antwort
Seite 3 von 3     123   
Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#21

Re: Tastaturdruck Emulieren

  Alt 21. Sep 2003, 05:39
hoi luckie,

ne, vieleicht habe ich mich eben falsch ausgedrückt, es soll ein tastaturdruck simuliert werden,...sagen wir einfach mal das ein <A> in die "luft" geschrieben wird
Mario
MSN: cyanide@ccode.de
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#22

Re: Tastaturdruck Emulieren

  Alt 21. Sep 2003, 05:42
Du kannst nichts in die "Luft" schreiben. Irgendwo muß es ja landen, sonst kannst du dir das gleich sparen. BTW was ist für dich Luft?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#23

Re: Tastaturdruck Emulieren

  Alt 21. Sep 2003, 06:36
sagen wir mal ich schreibe einfach ein "A"(als beispiel) in einem IE Fenster, dawürde ja nichts passieren, da ja kein schreibfeld etc da ist, aber das Programm das ich habe loggt den geschriebenen buchstaben (also als tastendruck). Ich möchte das mein programm, wenn ich button1 anklicke, ein "A" schreibt, ein Ziel gibt es eigentlich nicht, nur das andere Programm muss diesen registrieren
Mario
MSN: cyanide@ccode.de
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#24

Re: Tastaturdruck Emulieren

  Alt 21. Sep 2003, 14:40
Moin Silent,

wenn Du nicht das Handle hast, an das Du die Taste schicken willst, musst Du es mit keybd_event machen.
Dabei stehst Du mit Deiner Umsetzung allerdings vor einem Problem:
keybd_event wirkt sich auf das Fenster aus, das den Tastaturfokus hat, was automatisch Deines ist, wenn Du dabei einen Button anklickst.

Nimm mal einen Button und einen Timer und mach mal das Notepad auf.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  keybd_event(VK_SHIFT,0,0,0);
  keybd_event(ord('A'),0,0,0);
  keybd_event(ord('A'),0,KEYEVENTF_KEYUP,0);
  keybd_event(VK_SHIFT,0,KEYEVENTF_KEYUP,0);
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Button1Click(nil);
end;
Als erstes startest Du Dein Programm mal mit Timer1.Enabled := false, wechselst auf das Notepad, und klickst dann den Button in Deinem Formular an. Im Notepad rührt sich nichts.
Jetzt noch einmal das gleiche mit aktiviertem Timer.
Es werden im Sekundenabstand A in das Notepad geschrieben.

Im ersten Fall hat der Button den Tastaturfokus, und erhält das A, darum klappt es nicht.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#25

Re: Tastaturdruck Emulieren

  Alt 21. Sep 2003, 17:01
hoi Christian,

danke für den Code, der funzt einwandfrei
Das Programm loggt den zwar nicht (muss wohl irgendwie ein schutz sein ). Aber wenigstens weiss ich wie es überhaupt geht keys zu senden 8)
Mario
MSN: cyanide@ccode.de
  Mit Zitat antworten Zitat
Tyrael Y.

Registriert seit: 28. Jul 2003
Ort: Stuttgart
1.093 Beiträge
 
Delphi 2007 Professional
 
#26

Re: Tastaturdruck Emulieren

  Alt 23. Sep 2003, 17:05
nochmal vielleicht zur Verdeutlichung, da mir der Christian in dme anderem Thread geholfen hatte



SendMessage(Handle,WM_KEYDOWN,VK_DOWN,0);

Handle : Handle zur Komponente/Fenster in der Tastendruck simuliert werden soll

WM_KEYDOWN: bedeutet simuliere einen keydown-Ereignis
(bei WM_KEYUP wird halt ein keyup-Ereignis simuliert)

VK_DOWN: <-- der Tastendruck der ausgelöst werden soll (VK_DOWN = Richtungstaste nach oben, hier kann man alle möglichen virtuellen Tasten angeben, also auch z.B. VK_RETURN, VK_ESCAPE...usw.)


so dass sollte jetzt zum Verständnis für jeden reichen...

... hat ja auch für mich gereicht
Levent Yildirim
Erzeugung von Icons aus Bildern:IconLev
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#27

Re: Tastaturdruck Emulieren

  Alt 23. Sep 2003, 17:13
Keybd_Event(VK_RETURN, 0, 0, 0); //key down
Keybd_Event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0); //key up
Jens
  Mit Zitat antworten Zitat
Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#28

Re: Tastaturdruck Emulieren

  Alt 16. Jan 2004, 13:58
hoi,

ich habe immernoch das problem...also der simulierte tastendruck funktioniert zwar, aber das prog das diese keys loggt, loggt diesen nicht mit bzw zählt ihn nicht..gibt es nich noch ne andere möglichkeit?

also mit :

Delphi-Quellcode:
Keybd_Event(VK_RETURN, 0, 0, 0); //key down
Keybd_Event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0); //key up
loggt das prog (nicht meins) diesen key nicht
Mario
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 3 von 3     123   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:32 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz