Zitat von Aviator:

Ich konnte mich allerdings bisher nicht an die Umstellung auf Generics in Bezug auf den VST gewöhnen.

Das ist ja der Helper für die alten Versionen. Die generische Variante direkt habe ich selber noch kaum benutzt.

Zitat von jaenicke:

Zitat von Aviator:

Ich konnte mich allerdings bisher nicht an die Umstellung auf Generics in Bezug auf den VST gewöhnen.

Das ist ja der Helper für die alten Versionen. Die generische Variante direkt habe ich selber noch kaum benutzt.

Geht gut! In der offiziellen Version hängt die Funktion aber am Node, was natürlich intuitiver ist.
Hier ein Beispiel:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TScreenControlsForm.vstScreenComponentsGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex;
  TextType: TVSTTextType; var CellText: string);
var
  Info: IScreenComponentInfo;
begin
  Info := Node.GetData<IScreenComponentInfo>;
  if Assigned(Info) then
  begin
    CellText := Info.Text;
  end;
end;