我有一个带有可编辑项目的TreeView。当我按F2或选择后单击任何项目时,将出现就地编辑器。
在显示它之前,我如何更改在该编辑器中显示的文本?例如,我的树项的文本为Point 1 (300, 450)
,但我希望就地编辑器仅显示Point 1
。
我试图捕捉这样的OnEditing
事件:
procedure TForm1.TreeViewEditing(Sender: TObject; Node: TTreeNode;
var AllowEdit: Boolean);
begin
AllowEdit := True;
Node.Text := 'text to edit';
end;
但是,就地编辑器的文本未更改,仅在取消编辑后更新树项目的文本。如何正确执行此操作?
[尝试以下是否适合您:
uses
Winapi.CommCtrl;
procedure TForm1.TreeView1Editing(Sender: TObject; Node: TTreeNode; var AllowEdit: Boolean);
var
EditHandle: THandle;
S: string;
begin
AllowEdit := True;
S := 'text to edit';
EditHandle := TreeView_GetEditControl((Sender as TTreeView).Handle);
SendMessage(EditHandle, WM_SETTEXT, 0, LParam(PChar(S)));
end;
这里是在C ++中寻找相同问题的解决方案。 Ondrej Kelle用C ++翻译的答案是这样的:
TTreeView* tree;
std::string str;
HWND EditHandle = TreeView_GetEditControl(tree->Handle);
::SendMessage(EditHandle, WM_SETTEXT, 0, (LPARAM)(str.c_str()));