Hallo Hartmut,
ich habe jetzt mal ein bischen mit dem Code aus Deinem verlinkten Beitrag getestet und folgendes ist dabei rausgekommen :
Delphi-Quellcode:
procedure TForm16.OnAppMsg(var Msg: TMsg; var Handled: Boolean);
begin
Handled := False;
if Msg.message = WM_KEYDOWN then
begin
if (Msg.wParam = VK_RETURN) and (tv1.IsEditing) then
begin
if (tv1.Selected.Text = 'Neue Kategorie') then
begin
ShowMessage('Bitte einen neuen Namen eingeben !!' + #13#10 + tv1.Selected.Text);
tv1.Selected.EditText;
end;
Handled := True;
end;
end;
end;
Das einzigste Problem, was im Moment noch besteht, wie komme ich an den aktuellen Text, der im Editiermodus im TreeView eingegeben ist
Denn so wie ich es jetzt gemacht habe, hat er in der ShowMessage immer noch "Neue Kategorie".