什么替换Virtual TreeView中的函数keybd_event来改变最后一个字母的位置？

Question

请原谅我非常糟糕的英语，但我只想替换另一个函数的函数（keybd_event）。我想要使​​用比＆＃34; keybd_event＆＃34;更好的东西。 （也许＆＃34; SelStart＆＃34;是更好的选择）。 看看我的代码：

procedure TForm1.VirtualStringTree1ColumnClick(Sender: TBaseVirtualTree;
  Column: TColumnIndex; Shift: TShiftState);
var
  Wsk: PVirtualNode;
  Kol: Integer;
begin
  Wsk := VirtualStringTree1.FocusedNode;
  Kol := VirtualStringTree1.FocusedColumn;

  if Assigned(Wsk) then
  begin
    VirtualStringTree1.EditNode(Wsk, Kol);

    keybd_event(VK_RIGHT, 0, 0, 0);
    keybd_event(VK_RIGHT, 0, KEYEVENTF_KEYUP, 0);
  end;
end;

Keybd效果是：

此功能＆＃34; keybd_event＆＃34;工作正常，但也许你知道其他更好的功能（例如SelStart）？ 一个人说＆＃34;你可以使用SelStart＆＃34;但VirtualStringTree1没有这个属性，但他说＆＃34;但是你可以将这个属性添加到这个＆＃34;但他不会再告诉我了。所以我不知道该怎么办才能得到（添加）＆＃34; SelStart＆＃34;对此。有什么想法吗？