Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Tasten über programm drücken


kronoide - Do 08.02.07 15:12
Titel: Tasten über programm drücken
Hallo erstmal,
kennt ihr vielleicht eine funktion mit dem das programm tasten drückt,
ist vielleicht etwas komisch ausgedrückt aber hoffe das ihr mich versteht :)


perry5 - Fr 09.02.07 15:01

Wurde schon mal gefragt, musste einfach mal die Forensuche benutzen :-D


basti_1984 - Fr 09.02.07 15:02

Ich kann mir darunter nicht wirklich etwas vorstellen werde mal bitte etwas konkreter.


marvin521993 - Fr 09.02.07 15:08

on key press


basti_1984 - Fr 09.02.07 15:22

Mit OnKeyPresss kannst du auf Tastendrücken in Eingabefelder reagierenalternativ ist Onchange oder ähnliches möglich ganz was du suchst.
Wenn du noch weitere hilfe benötigst melde dich einfach


elundril - Fr 09.02.07 15:26

ist vl. das die antwort die du suchest: http://www.dbr-software.de/delphi/keyb.php

lg el


kronoide - Fr 09.02.07 19:04

manche haben mich falsch verstanden ich möchte nicht das er auf tasten reagiert sondern
das er tastendruck simuliert :wink:

und jetzt habe ich diesen quelltext:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
procedure tastendruck(T, ZS: word; zs2:word; TWC: TWinControl);
begin
  if TWC <> nil then 
  TWC.setfocus;
  keybd_event(ZS, 000);
  keybd_event(T, 000);
  keybd_event(zs2, 000);
  keybd_event(zs2, 0, keyEventF_keyUp, 0);
  keybd_event(T, 0, keyEventF_keyUp, 0);
  keybd_event(ZS, 0, keyEventF_keyUp, 0);
end


procedure TForm1.Button1Click(Sender: TObject);
begin
  tastendruck(VK_DELETE, VK_menu, VK_LCONTROL, application.mainform);

end;

end.


und möchte das er den taskmanager aufruft aber macht er leider nicht,
wisst ihr was falsch ist? :oops:


Saubäär - Fr 09.02.07 21:42

Hi kronoide,

wenn du nur den Taskmanager aufrufen willst, warum dann nicht mit ShellExecute sondern so umständlich???


Delphi-Quelltext
1:
 ShellExecute(Handle, 'open''taskmgr.exe'nilnil, SW_NORMAL);                    


Gruß

Saubäär