Rücktaste in cursor links umwandeln

[TurboMagic]

Hallo,

in einer Delphi 10.2 VCL Anwendung habe ich gerade versucht das Drücken der
Rücktaste/Backspace Taste zu erkennen und in ein "Cursor Taste links" gedrückt
zu verwandeln.

Delphi-Quellcode:

procedure TMyForm.MyEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if (Key in [vk_Back]) then
    Key := vk_Left;
end;

Nur leider funktioniert das nicht.
Liegt es evtl. daran, dass die Pfeiltasten (und einige weitere) zumindest unter DOS
immer erst ein #0 und dann den Tastencode senden?

Falls ja, wie kann das simuliert werden?
Oder geht es irgendwie anders?

Grüße
TurboMagic

[Cashew]

Hi,

im OnKeyPress Event könnte das ganze wie folgt aussehen:

Delphi-Quellcode:

procedure TMyForm.MyEditKeyPress(Sender: TObject; var Key: Char);
begin
  if (Key = #8) then begin
    Key := #0;
    if (MyEdit.SelStart > 0) then
      MyEdit.SelStart := MyEdit.SelStart-1;
  end;
end;

[TurboMagic]

Danke!