Announcement

Collapse
No announcement yet.

Tastatureingaben im Programm auslesen

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Tastatureingaben im Programm auslesen

    Hallo

    ich möchte gerne wissen wie ich Tastatureingaben(Taste für Taste die eingegeben wird) im Programm auslesen kann.
    Beispiel!!!(am liebsten in Delphi 4/5)

    Danke Marcel

  • #2
    Hallo,

    in der Delphi-Hilfe findet sich zum Suchbegriff <b>OnKeyPress</b> das folgende Beispiel:
    <pre>
    Diese Ereignisbehandlungsroutine zeigt ein Meldungsfeld mit der
    Bezeichnung der zuletzt gedrückten Taste an.

    procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
    begin
    MessageDlg(Key + ' wurde gedrückt!', mtInformation, [mbOK], 0)
    end;
    </pre>
    Ein zweites Beispiel ist unter <b>OnKeyDown</b> zu finden:
    <pre>
    Im folgenden Beispiel wird ein Druckauftrag abgebrochen, sobald der
    Benutzer die Taste ESC drückt. Beachten Sie, daß KeyPreview auf True
    gesetzt werden muß, damit die Ereignisbehandlungsroutine für Form1
    aufgerufen wird.

    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
    begin
    if (Key=VK_ESCAPE) and Printer.Printing then
    begin
    Printer.Abort;
    MessageDlg('Druckauftrag abgebrochen', mtInformation, [mbOK],0);
    end;
    end;
    </pre&gt

    Comment


    • #3
      ich gebe zu meine Fragestellung war falsch.
      dies soll auch möglich sein wenn das Programm im Hintergrund läuft also nicht aktiv ist

      Comment


      • #4
        Wann du nur ein paar tasten zum Abfragen hast könntest du's mal mit GetAsyncKestate probiere

        Comment


        • #5
          Tastatureingabe bei ausländischen Tastaturen

          Ich habe eine zusätzliche Frage:

          Wie sieht es eigentlich bei ausländischen Tastaturen aus. Ich habe einfach mal polnische Tastatur eingestellt und bekomme als Ergebnis das Zeichen des westlichen Zeichensatzes, welches den Platz des gewählten mitteleuropäischen Zeichens hat z.B. ³ statt ł und ê statt ę.

          Diese Frage möchte ich auch auf die Eingabe von Text in einem Edit-Feld erweitern. Wie mache ich hieraus einen WideString für Unicode-Zeichensatz.

          Hier hätte ich natürlich gerne das richtige Zeichen.
          Zuletzt editiert von Janek; 22.08.2010, 13:01.

          Comment


          • #6
            Janek:
            Das ist keine zusätzliche sondern eine neue Frage. Mache bitte einen eigenen Thread damit auf, sonst vermischen sich hier die Antworten.

            Marcel:
            meinst du vielleicht sowas: Keyboard hook

            bye,
            Helmut

            Comment

            Working...
            X