OnKeyPress keine Umlaute unter Linux

[Mathias]

Code: Alles auswählen

procedure TForm1.FormKeyPress(Sender: TObject; var Key: char);
var
  ch: char;
begin
  Caption := IntToStr(byte(key));
end;     

Egal welcher Umlaut ich drücke, unter Linux kommt bei Key immer ein '?' (Code 63)
Was mache ich falsch ?

Unter Windows gehen alle Zeichen ohne Probleme.

[theo]

OnUTF8KeyPress

[Mathias]

Gewusst wie.

Danke!

Code: Alles auswählen

procedure TForm1.Form1UTF8KeyPress(Sender: TObject; var UTF8Key: TUTF8Char);
begin
  Label1.Caption := UTF8Key + ' - ' + IntToStr(Length(UTF8Key));
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
  OnUTF8KeyPress := @Form1UTF8KeyPress;
end;    

Ist dies richtig ?

LCL verwendet generell UTF8.
FPC verwendet das gleiche wie das Betriebssystem.
Windows verwendet Unicode.

Was verwendet Linux ?

[theo]

Du musst das nicht "von Hand" einhängen, das steht genauso im Objektinspektor zur Verfügung wie OnKeyPress.

Linux verwendet UTF-8, also Unicode.

[Mathias]

das steht genauso im Objektinspektor zur Verfügung wie OnKeyPress.

Habs gesehen, es steht ganz unten im Objectinspector.