//做的改动
1.//function TStringEditLink.PrepareEdit(Tree: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex): Boolean;
//you can set the value diaplaying int the editor here
Text :=FTree.GetText(Node,Column);
FirstMatch :=Pos ('(',Text );
if FirstMatch 0 then
LastMatch :=Pos (')',Text )
else
begin
FirstMatch :=Pos ('"',Text );
if FirstMatch 0 then
LastMatch :=Pos (';',Text )-1;...[ 查看全文 ]