Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi SNDKEY23 Fragen! (https://www.delphipraxis.net/135090-sndkey23-fragen.html)

MasterTobi 4. Jun 2009 16:26


SNDKEY23 Fragen!
 
Hallo,

also
1. Habe die SNDKEY32 .pas eingebunden und sie Funktioniert auch

so =)

un zwar ich möchte mal versuchen einen KeyBinder zu Programmieren, sollte ja mit der SNDKEY funktionieren.

Delphi-Quellcode:
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  case Key of
    Ord('1'): .....
end;
end;
ist ja dafür da das wenn ich die taste "1" drücke etwas passiert =)

jetzt soll, wenn ich "1" drücke, in einem anderen Programm folgendes passiert:
erst soll die Taste T gedrückt werden, dann ein Text << am besten kann ich den selbst bestimmen un dann soll die Taste "Enter" gedrückt werden.

kann mir da jemand helfen? brauche nur einen Ansatz =)

mfg
Tobi

DeddyH 4. Jun 2009 17:46

Re: SNDKEY23 Fragen!
 
Etwas mehr als nur ein Ansatz: http://www.delphipraxis.net/internal...=562719#562719

MasterTobi 4. Jun 2009 18:27

Re: SNDKEY23 Fragen!
 
puh das bringt mic gar net weiter :D sry
könntest du mir vll helfen ? ein kleines einfaches bsp

MasterTobi 4. Jun 2009 21:28

Re: SNDKEY23 Fragen!
 
ok hab es verstanden =) weiß nu was es macht =) un wie es geht.
nun ist meine frage : wie schaffe ich es nach :
Delphi-Quellcode:
procedure TForm1.Timer2Timer(Sender: TObject);
begin
  if (GetASYNCKeyState (VK_DECIMAL) <> 0) then
  begin
    keybd_event(VKKeyScan('t'),0,0,0);
das er mir einen Text hinschreibt ? =)

toms 5. Jun 2009 03:31

Re: SNDKEY23 Fragen!
 
EnterText('Hallo');

MasterTobi 5. Jun 2009 06:47

Re: SNDKEY23 Fragen!
 
VIELEN DANK AN EUCH =) *HAPPY*


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:13 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz