Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Tastatureingabe ohne Ortsangabe simulieren (https://www.delphipraxis.net/14720-tastatureingabe-ohne-ortsangabe-simulieren.html)

sCrAPt 14. Jan 2004 16:18


Tastatureingabe ohne Ortsangabe simulieren
 
HiH :o
Ich hab grad rumgesucht und immer nur Codes gefunden mit denen man Tastatureneingaben in einem bestimment Ort (TListview, TEdit, TMemo, usw...) simulieren kann. Wie kann ich denn eine Tastatureingabe ohne "Ortsangabe" simulieren?

:angle:, sCrAPt

himitsu 14. Jan 2004 16:27

Re: Tastatureingabe ohne Ortsangabe simulieren
 
Liste der Anhänge anzeigen (Anzahl: 1)
Das Teil sendet z.B. Tastaturereignisse an die jeweils aktive Anwendung.

(Beschreibung steht in der Unit)

tHeRiAn 14. Jan 2004 16:28

Re: Tastatureingabe ohne Ortsangabe simulieren
 
hi


meinst du vielleicht sowas :?:

Delphi-Quellcode:


procedure TForm1.HandleMessages(var Msg: tMsg; var Handled: Boolean);
begin
  if (Msg.message = WM_KeyDown) and
    (Msg.wParam in [VK_F1]) then
  begin
    ShellExecute(0,Nil, PChar(ExtractFilePath(Paramstr(0))+'calcu2004.hlp'), Nil, Nil, SW_NORMAL);
    Handled := True;
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnMessage := HandleMessages;
end;
hier mit wird in einem prog die f1 abgefangen.....


ciao therian

sCrAPt 21. Jan 2004 16:08

Re: Tastatureingabe ohne Ortsangabe simulieren
 
hih :o

Ich will aber die Simulation nicht in der aktiven Anwendung und will kein F1 abfangen (?) ... Die letzte Möglichkeit währe angeben zu müssen welchen Fenstertitel das Programm hat in dem ich eine Tastatureingabe simulieren will.

:angle:, sCrAPt

SirThornberry 21. Jan 2004 16:36

Re: Tastatureingabe ohne Ortsangabe simulieren
 
Keybd_Event(VkKeyScan('a'), 0, 0, 0); //taste runter
Keybd_Event(VkKeyScan('a'), 0, KEYEVENTF_KEYUP, 0); //taste hoch

sCrAPt 21. Jan 2004 17:03

Re: Tastatureingabe ohne Ortsangabe simulieren
 
Ja, genau das hab ich gesucht. THX

:angle:, sCrAPt


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:11 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 by Thomas Breitkreuz