Zitat von
Christian Seehase:
Wieso funktioniert alLeft beim Webbrowser nicht richtig, wenn er so erzeugt wird?
Mit ParentWindow kann die
VCL Ausrichtungsroutine nicht wirklich etwas anfangen. Sie benötigt ein TWinControl. Weil TWebBrowser (bzw. IWebBrowser) die Eigenschaft Parent neu deklariert, hat man auch keinen Zugriff auf die von TOleControl geerbte Eigenschaft Parent.
Folgender Code kommt auch ohne CreateWnd aus.
Delphi-Quellcode:
uses OleCtrls;
constructor TcsExplorerListView.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Width := 600;
Height := 300;
FListView := TListView.Create(Self);
FListView.Parent := Self;
FListView.Align := alClient;
FWebBrowser := TWebbrowser.Create(Self);
TOleControl(FWebBrowser).Parent := Self;
FWebBrowser.Align := alLeft;
end;