Application.CreateForm in einem Thread

[jaenicke]

Zitat:

Zitat von Aviator (Beitrag 1370847)

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.

[TiGü]

Zitat:

Zitat von jaenicke (Beitrag 1370881)

Zitat:

Zitat von Aviator (Beitrag 1370847)

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:

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;