Tastensimulation Frage

[angos]

Hi,

na wenn du das so siehst, solltest du dich vielleicht auch erst damit beschäften nachdem du unterrichtet wurdest.
Es gibt halt nicht viel Sinn etwas machen zu wollen, wenn die Grundlagen fehlen. Daher auch mein Tip: Schau dir das Tutorial ruhig an, schaden wirds nicht (und je nach Schule/Lehrer hast du damit vielleicht sogar mehr Wissen)

[xxgoodboyxx]

hmmm komisch hab alles verbessert und nun bekomm ich in dieser zeile " inkompatible typen" angezeigt:

Delphi-Quellcode:

  if Key = VK_F1 then

[mkinzler]

Zitat:

brauche nicht dieses tutorial , da ich in der schule mit informatik unterrichtet werde Very Happy

Das eine hat imho nicht mit dem anderen zu tun.

Zitat:

hmmm komisch hab alles verbessert und nun bekomm ich in dieser zeile " inkompatible typen" angezeigt:

Hast du den Typ von Key geändert?

[xxgoodboyxx]

ja auf char... macht der aber automatisch wenn ich die onkey methode auswähle :P

[mkinzler]

Delphi-Quellcode:

if Ord(Key) = VK_F1 then

[xxgoodboyxx]

funktioniert auch nicht :( ich werde noch wahnsinnig... :D

mein bisheriger quellcode lautet :

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls;

type
  TForm1 = class(TForm)
    Panel1: TPanel;
    procedure FormCreate(Sender: TObject);
    procedure FormKeyPress(Sender: TObject; var Key: Word;Shift: TShiftState);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  pressed : Integer;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
keypreview:=true;
pressed := 0
end;

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Ord(Key) = VK_F1 then
  ShowMessage('F1 gedrückt') ;
end;

end.

[mkinzler]

Das Formular reagiert sio nicht auf Tasten.
Ich würde es mit der Registrierung eine hotkey versuchen. zB. mit TJvApplicationHotKey aus der JVCL

[xxgoodboyxx]

mhh wieso geht es denn so nicht?

[toms]

Zitat:

Zitat von xxgoodboyxx

mhh wieso geht es denn so nicht?

Warum verwendest du denn das OnKeyPress Ereignis? Lies doch mal in der OH über die OnKeyPress/OnKeyDown/OnKeyUp Ereignisse.

zu OnKeyPress steht u.a.:

Zitat:

Verwenden Sie die Ereignisbehandlungsroutine für OnKeyPress, um eine Aktion als Reaktion auf den Druck einer einzelnen Taste auszuführen.

Der Parameter Key in der Ereignisbehandlungsroutine für OnKeyPress hat den Typ Char. Deshalb registriert das Ereignis OnKeyPress das ASCII-Zeichen der gedrückten Taste. Entspricht die Taste keinem ASCII-Zeichenwert (beispielsweise Umschalt oder F1), wird kein OnKeyPress-Ereignis generiert.

[xxgoodboyxx]

ah okay danke :P
wie könnte ich es denn anders machen , sodass es funktioniert?