Thema: Delphi Tastencode und Unicode

Einzelnen Beitrag anzeigen

Benutzerbild von akurka
akurka

Registriert seit: 30. Dez 2008
Ort: Schweiz, 8636 Wald ZH
81 Beiträge
 
Delphi 7 Personal
 
#1

Tastencode und Unicode

  Alt 19. Mär 2016, 17:37
Hallo
Folgendes Problem :
Zeichen <,=,> eingelesen beim Form2.OnKeyDown haben den Code 226,48,228.
Gemäss Unicode müsten es aber 60,61,62 sein.

Leider kennt Delphi keinen VK_code für < oder > Tasten ich musste darum direkt mit dem Tastencode arbeiten. Beispiel :

im OnKeyDown wird "DownTaste := Key" bei der Taste < gedrückt,
(DownTaste :word).
anschliessend dann
Buffer := chr(DownTaste); (auch Buffer:= chr(ord(DownTaste))liefert den
gleichen Resultat).
in der Ausgabeprocedur wird mit Form2.Canvas.TextOut(X,Y,Buffer) das Zeichen in der Grafik ausgegeben

Angezeigt werden in der Graphik mit Form2.Canvas.TextOut für z.Bsp
< : ein a(mit circumflex), was dem UniCode entspricht, gewünscht wäre aber eine Anzeige von < .

Ein Wechsel von CharSet im OI hat keine Auswirkung.
Alle anderen Zeichen werden korrekt eingelesen und auch in der Graphik
korrekt angezeigt.
Auch ein Versuch mit OnKeyPress (liefert direkt ein Char) hat nichts gebracht.

Hat jemand eine Idee wo das Problem liegt ?
vielen Dank in voraus.
Anton Kurka
  Mit Zitat antworten Zitat