实现在virtualStringtree中编辑的标准步骤
1.设置TVirtualStringTree属性:
toFullRowSelect : false;
toMultiSelect:false;
toExtendedFocous:true;
toEditable:true;
editDelay:0 //如果不调用editnode,则不会CREATE EDITOR
2.实现virtualStringtree的ONClick事件:
功能:根据当前获取焦点的node,判断是否edit该node
TMMSLibraryForm版本:
procedure TMMSLibraryForm.DataTreeClick(Sender: TObject);
var
Column:TColumnIndex;
node:PVirtualNode;
begin
if DataTree.FocusedNode=nil then Exit;
node:=DataTree.FocusedNode;
Column:=DataTree.FocusedColumn;
if Column<>3 then
DataTree.EditNode(node,Column);
end;
TSPNumbersForm版本:
补充:软件开发 , Delphi ,