TreeView-->OnEditing/OnEdited die Enter-Taste abfangen

[RWarnecke]

Dieser Code funktioniert insoweit, dass das Eingebene erst nach dem betätigen der Enter-Taste sichtbar wird.

Delphi-Quellcode:

procedure TForm16.OnAppMsg(var Msg: TMsg; var Handled: Boolean);
begin
  Handled := False;
  if Msg.message = WM_KEYDOWN then
  begin
    if tv1.IsEditing then
    begin
      if (Msg.wParam > 64) and (Msg.wParam < 91) then // oder irgendeine andere Taste deiner Wahl
        EditedTxt := EditedTxt + chr(Msg.wParam)
      else
        if (Msg.wParam = VK_RETURN) then
        begin
          tv1.Selected.Text := EditedTxt;
          EditedTxt := '';
        end;
      Handled := True;
    end;
  end;
end;

Es muss ja irgendeine Message ausgelöst werden, wenn ich eine Node in den Editiermodus setze mit tv1.selected.edittext . Genau diese Message möchte ich trotzdem senden, auch wenn ich nur die Enter-Taste betätigt habe und keine andere Taste gedrückt habe. Dabei soll dann der Text überprüft werden und dementsprechend reagiert werden.