//做的改动

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;
    end;

   if LastMatch <>0 then
      Text :=Copy (Text,FirstMatch ,LastMatch -firstmatch+1);


2.//procedure TStringEditLink.SetBounds(R: TRect);

  //to change the left of bound

       text:= FTree.GetText(FNode,0);