j-Taste abfangen?

[AlexII]

Ich wechsle auf eine kyrillische Sprache und da ist ein 'j' was anderes. Hier mein Code:

Delphi-Quellcode:

procedure TMainForm.FormKeyPress(Sender: TObject; var Key: char);
begin
  if Key = 'j' then
  begin
    if VolumeOnImage.Visible = True then VolumeOnImageClick(Self)
    else VolumeOffImageClick(Self);
  end;
end;

Ich möchte damit nur zwei Prozeduren aufrufen (Lautstärke ein/ausschalten), mehr nichts. Und ich habe mich für die j-Taste entschieden, da sie ne Markierung für blinde hat.

[Dalai]

Zitat von AlexII:

Ich wechsle auf eine kyrillische Sprache und da ist ein 'j' was anderes.

Logisch.

Zitat:

Delphi-Quellcode:

procedure TMainForm.FormKeyPress(Sender: TObject; var Key: char);
begin
  if Key = 'j' then
  begin
    if VolumeOnImage.Visible = True then VolumeOnImageClick(Self)
    else VolumeOffImageClick(Self);
  end;
end;

Klar, dass das nicht funktioniert, denn du vergleichst mit einem j in ANSI-Codierung, so wie er in deinem Quelltext steht.

Zitat:

Ich möchte damit nur zwei Prozeduren aufrufen (Lautstärke ein/ausschalten), mehr nichts. Und ich habe mich für die j-Taste entschieden, da sie ne Markierung für blinde hat.

Und du meinst, das wäre bei jedem Tastaturlayout so? AFAIK ist das J nicht bei jedem Layout an derselben Stelle, die Markierung für Blinde aber schon (immer in der mittleren Zeile, mittig platziert).

MfG Dalai

[Captnemo]

Zitat von AlexII:

Ich wechsle auf eine kyrillische Sprache und da ist ein 'j' was anderes.

Na, das ändert die Sachlage ja schon mal erheblich.

Wenn du mit deinem Kyrillischen Tastaturlayout auf das J drückst, kommt beim Programm logischerweise kein J an, somit hat das abfragen auf J auch keinen Sinn mehr.

Prüfe im Debugger welches Zeichen kommt, und prüfe in der IF-Abfrage auf dieses Zeichen.

[Luckie]

Du willst keinen bestimmten Buchstaben abfangen, sondern die dritte Taste von Links in der zweiten Reihe. Oder wie?

[DeddyH]

Dann lass Dir doch einfach ausgeben, was im kyrillischen Tastaturlayout bei 'j' herauskommt.

[BadenPower]

Zitat von DeddyH:

Dann lass Dir doch einfach ausgeben, was im kyrillischen Tastaturlayout bei 'j' herauskommt.

Das nützt ihm allerdings nur bedingt, denn er möchte ja in jeder Sprache bzw. mit jedem Tastaturlayout beim Druck auf die gleiche Taste die Funktionen aufrufen, egal welches Zeichen die Taste sendet.


Das heisst, dass er im KeyPress-Event ermitteln muss, welche Sprache/Tastaturlayout eingestellt ist und welches Zeichen diese Taste sendet.

[AlexII]

Zitat von DeddyH:

Dann lass Dir doch einfach ausgeben, was im kyrillischen Tastaturlayout bei 'j' herauskommt.

Das wird ein 'o' ausgegeben mit showmessage(key) wird aber ein '?', voll komisch. Aber das ist eine halbfertige Lösung, da ich das auch für andere nicht germanische Sprachen schreibe.

[milos]

Ich denke wenn du alle Tastaturlayouts unterstützen willst, wäre es am besten wenn du das Layout beim anzeigen und beim ausblenden der Form anpasst und du trotzdem nur mit einem Layout arbeiten kannst.

Also...

Bei FormShow wird das Tastaturlayout auf deutsch gesetzt. Somit kannst du ein einfaches "j" abfragen und jeder wird bei der Taste mit dem Strich, wo bei uns das normale "j" ist, ein "j" schicken.

Dieser Code setzte das Layout auf das Deutsche Layout.

Delphi-Quellcode:

var kbCOde : LongWord;
kbString : Array[0..9] of char;
begin
// The following line is the translation of the MAKELANGID
// macro explained in the WIN32 developper's reference help.
// if you start with "LoadKeyBoardLayout" then click the hyperlink
// to MAKELANGID. You will see all the constant I've used here.
// No more "magic numbers" like 409 or 419.

kbCode := (SUBLANG_DEFAULT shl 10) or LANG_GERMAN;

// The line below is to switch to a french canadian keyboard
//kbCode := (SUBLANG_FRENCH_CANADIAN shl 10) or LANG_FRENCH;

//Convert the binary code to an Hex string;
StrPCopy(kbString, IntToHex(kbCode, 8));

// Switch the keyboard know
LoadKeyboardLayout(@kbString, KLF_ACTIVATE);
end;

Quelle: http://www.delphipages.com/forum/sho...57&postcount=3

Wenn das ausgeführt wurde, kannst du ein einfaches J abfragen.


Das bei dem Kyrillischem Layout ein ? gesendet wird liegt wohl am ascii string.

[AlexII]

@milos

Ok... aber damit zwinge ich den User dazu, noch nen blinden, eine andere Belegung in meinem Prog zu nutzen... so wie ich das verstehe, oder?

[milos]

Zitat von AlexII:

@milos

Ok... aber damit zwinge ich den User dazu, noch nen blinden, eine andere Belegung in meinem Prog zu nutzen... so wie ich das verstehe, oder?

Genau.

Was ich nicht ganz verstanden habe. Willst du das Programm im Hintergrund laufen lassen? Wenn ja wäre mein Vorschlag keine Option dafür. Wenn aber das Programm geöffnet werden muss könnte man es versuchen, denn du könntest das Layout wieder zurück setzen wenn das Forumlar den Fokus verliert.