Einzelnen Beitrag anzeigen

tHeRiAn

Registriert seit: 16. Okt 2003
Ort: Neunkirchen, Siegerland
51 Beiträge
 
Delphi 5 Enterprise
 
#3

Re: Tastatureingabe ohne Ortsangabe simulieren

  Alt 14. Jan 2004, 16:28
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
  Mit Zitat antworten Zitat