Ich sitze jetzt seit einer Stunde an einem Problem und komme nicht weiter.
Momentan bin ich dabei einen Browser zu programmieren, der sich auch einiger Zusätze aus anderen Browsern bedienen soll - eigentlich nichts weltbewegendes.
Das Problem schildert sich wie folgt:
Auf meiner Main_Form wird die Komponente Webbrowser in einer Pagecontrol angezeigt. Mittels Url_edit.text (Eingabefeld) wird die Webseite in diesem Tabsheet des Pagecontrols aufgerufen und der Webbrowser.LocationName als Tabsheet.Caption angezeigt
Bei Aktivierung eines Buttons wird seitlich eine Listbox angezeigt, die Webseiten aus einer Ini auslesen soll. Das funktioniert bis hier hin auch alles einwandfrei.
Mit einem weiteren Button versuche ich nun eine weitere Form aufzurufen, die die momentan aktive Seite als Favorit abspeichern soll - praktisch wie beim IE die Favoriten verwalten Ansicht.
Dazu benutze ich folgenden Code:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| procedure TMain_Form.Fav_add_ButtonClick(Sender: TObject);
begin
RemindLocationName:=(Pagecontrol1.ActivePage.Controls[0] as TWebbrowser).LocationName; favedit_Form:= Tfavedit_Form.create(aplication); favedit_Form.show;
favedit_Form.bringtofront;
Main_Form.Enabled:=false;
end; |
Die Übernahme des Webseitennamens funktioniert, die Funktion die Webseite in die Ini mit Namen / Url einzutragen ebenfalls.
Zum Schließen des Favedit_Forms gibt es neben dem Standard X des Fensters auch einen Button abbrechen, dessen OnClick Ereigniss so ausschaut:
Delphi-Quelltext
1:
2:
3:
4:
5:
| procedure TFavedit_Form.Button2Click(Sender: TObject);
Favedit_Form.close;
Main_Form.Enabled:=true;
Main_Form.bringtofront;
end; |
Das Favedit_Form wird geschlossen und das Main_Form wird wieder angezeigt - ABER! - nun wird im Webbrowser die Startseite (Definiert) neu geladen, d.h. die Komponente wird praktisch neu initialisiert obwohl nur das Favedit_Form geschlossen wurde.
Das disablen / enablen muss jedenfalls sein, damit keine Fehler beim Übernehmen der Webseite als Favorit entstehen (durch etwaiges rumsurfen zu anderen Seiten).
Die vor dem Öffnen des Favoriten Fensters angezeigte Webseite soll nämlich erhalten bleiben.
Ich hoffe ich habe mein Problem einigermaßen vernünftig und verständlich dokumentiert.
Vielleicht könnt ihr mir ja sagen wo der Fehler liegt oder mir einen Denkanstoss geben.
Danke im Vorraus
