仮想ツリーリストノードのキャプションを設定する

Question

ドキュメントに記載されているプロセスを理解できません。それはイベントを使用すると言う：

procedure TForm1.VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; 
       Column: Integer; TextType: TVSTTextType; var CellText: WideString); 
var 
    Data: PTreeData; 
begin 
    Data:=VST.GetNodeData(Node); 
    CellText := Data^.FCaption; 
end; 

どうすればよいですか？私はこのように再宣言できません。私はツリー一覧OnGetTextEventをダブルクリックすると、それは私にいくつかの例外をスローし、「プロパティとメソッドは互換性がありません」

Answer 1

私のプロジェクトには何か問題がありました。私はそれを再現したので、何がわかりません。 GetTextイベントが正しく機能するようになりました。上の私のコードは動作します。

Answer 2

あなたはDelphiとVirtualTreeviewバージョンに言及していないが、私は理由CellText: WideStringパラメータのザッツを推測する - それがstringである必要がありますUnicodeStringがDelphiのデフォルトの文字列型になった後で今すぐ入力してください。 IOWに変更する

procedure TForm1.VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; 
      Column: Integer; TextType: TVSTTextType; var CellText: string);