[Synedit] markierten text bei Tab nicht löschen

[Sharky]

Ich bin ja so blöde

Ich habe es bei mir immer im OnKeyDown getestet und den Code hier nur für das OnKeyPress angepasst.

Delphi-Quellcode:

procedure TSynDemoForm.SynEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key = Vk_Tab) and (Synedit1.SelLength > 0) then
  begin
    ShowMessage('huhu DP');
    Key := 0;
  end;
end;