Hi zusammen
Ich habe meiner Anwendung einen Edgebrowser verpasst, der seine Seiten in einem PageControl anzeigen soll. Aus Controlgründen sollen die geöffneten Tabsheets in einer Objektliste gespeichert werden, die so seit Jahren in gebrauch ist:
Delphi-Quellcode:
type
TEdgeBrowserFrame =
class(TFrame)
RzPageControl1: TRzPageControl;
TabSheet1: TRzTabSheet;
EdgeBrowser1: TEdgeBrowser;
private
{ Private-Deklarationen }
FFileName :
String;
FWebPageList : TDataObjectList<TRzTabSheet>;
public
{ Public-Deklarationen }
procedure EdgeBrowserNavigateproc;
procedure EdgeBrowserNewWebSeiteTab(
URL:
string);
constructor Create(AOwner: TComponent);
override;
destructor Destroy;
override;
implementation
{$R *.dfm}
{ TEdgeBrowserFrame }
constructor TEdgeBrowserFrame.Create(AOwner: TComponent);
begin
inherited;
FWebPageList := TDataObjectList<TRzTabSheet>.
// Hier
end;
destructor TEdgeBrowserFrame.Destroy;
...
Laut einem Beispiel, das ich mir in Notepad++ angelegt hatte, sollten Deklaration und Umsetzung so erfolgen:
Delphi-Quellcode:
// Deklarationsbeispiel einer Instanz einer generischen Objektliste:
FCategoryList: TDataObjectList<TQueryResultClass>;
// und das Create:
FCategoryList := TDataObjectList<TQueryResultClass>.Create();
TQueryResultClass ist dabei die Klasse, die bei der Verwendung des obigen Codes zum Einsatz kam. Leider scheint die Codevervollständigung zu streiken - bei andern Membern erhalte ich Vorschläge, aber hier nicht. Was ist hier falsch?
Gruss
Delbor