Mini Webbrowser Demo

[toms]

Hallo,

Ich habe ein Demo Projekt zusammengestellt rund um die Verwendung der TWebbrowser Komponente.

Es wird folgendes demonstriert:

• Druckerdialog anzeigen
• Drucker Setup anzeigen
• Drucker Vorschau anzeigen
• Suchen Dialog anzeigen
• Eigenschaften Dialog anzeigen
• Speichern Dialog

• QuellCode anzeigen
• Links auslesen
• Bilder Namen auslesen
• Felder Namen auslesen
• Frame Namen auslesen
• Objekt View (by shima)

• Zonen Icon, Zonen Name anzeigen
• Progressbar in Statusbar anzeigen
• Kleiner Popup Blocker
• Zoom Funktion
• Design Modus
• Codierung festlegen
• Globales Offline setzen
• Border Style festlegen
• Integrierte Google Suche
• Suchen & Highlight
• Element Info under der Maus anzeigen
• Scrollen: ganz nach oben/unten

• Multi Tabbed Browsing
• Browser Duplizieren
• Verlauf im Menü
• Enter, Backspace usw. Tasten, Drag & Drop aktivieren
• Ctrl+N behandeln
• Eigenes Popupmenu (resp. Default Popupmenu deaktivieren)
• Schliessen abfangen (z.B bei Javascript)
• HTML Code direkt in den Webbrowser laden
• Webbrowser dynamisch erzeugen

• Kopieren übers Menü
• Einfügen übers Menü
• Löschen übers Menü
• Ausschneiden übers Menü
• Alles markieren übers Menü
• Zurück, Vorwärts navigieren
• Zur Startseite navigieren

und vieles mehr.

Viel Spass....

MSHTML

[toms]

Zitat von Kompon Ente:

Hi toms,

wollte mal fragen, ob du was dagegen hast, wenn ich deinen Browser umprogrammiere und anpasse an meinen Chat?

Kein Problem, darfst ihn so umprogrammieren wie du möchtest.

Zitat von barf00s:

'n screenshot wär vllt auch mal nicht schlecht

Habe mal einen Screenshot im 1. Beitrag dieses Threads hochgeladen.

[Daniel G]

Hi toms, schönes Ding, allerdings:

Ich habe einen (bei mir) reproduzierbaren Fehler mit der original-exe.

*erstelle ich ein Duplikat vom Tab "Webbrowser", während er die Seite von AOL.com lädt. Versuche ich das Duplikat per Rechtklick=>Close Tab zu schließen, bombardiert er mich erst mit

Code:

---------------------------
Mini Webbrowser Demo
---------------------------
Access violation at address 00000000. Read of address 00000000.
---------------------------
OK   
---------------------------

und schließt dann den Tab.

Weiteres:
dupliziere ich das Duplikat von "Webbrowser" während des Ladevorgangs und versuche dies wiederum mit o.g. Methode zu schließen, knallt er mir das vor'n Latz:

Code:

---------------------------
Mini Webbrowser Demo
---------------------------
Privileged instruction.
---------------------------
OK   
---------------------------

Dann schließt er anstandslos den Tab.


Das alles passiert nicht, wenn die Seite fertig geladen hat.


So long,
daniel

[toms]

@Daniel G: Danke für das Feedback, werde mir die Bugs mal anschauen.

[rickleimbach]

GENIAL !

Sowas suchen die Delphi Anfänger !

Großes Lob werd mal sehen was ich daraus gebastelt bekomme bzw. was ich lernen kann ^^

[Engel77]

Hallo Toms,

ich finde dein Programm auch sehr gut und möchte gern noch etwas draus lernen.

Ich habe selber D5 Prof. und habe gerade versucht das Projekt zu compilieren, nur leider kommen bei mir einige fehler

wie z.B:

Panel1.DesignSize kennt er nicht.
und

[Fehler] SHDocVw.pas(46): Ungültige Compileranweisung: 'WARN'
[Fehler] SHDocVw.pas(48): Ungültige Compileranweisung: 'VARPROPSETTER'
[Fataler Fehler] SHDocVw.pas(51): Datei nicht gefunden: 'Variants.dcu'


Variants.dcu ist ja bei D5 noch nicht dabei soweit ich das mitbekommen hab.

Fehlen mir noch irgendwelche Komponenten ?


Danke für deine Mühen.

Gruß

Engel

[toms]

Hallo

Wenn ein Property Fehler wie "DesignSize unbekannt" kommt, kannst du, wenn es danach fraegt, dieses loeschen.
Resp. manuell aus der dfm loeschen.

Die Unit Variants kannst du aus den Uses Klauseln loeschen.

Betr. der SHDocVw: Wuerde diese mal neu importieren aus der ShDocVw.tlb
Sonst brauchst du eigentlich keine weiteren Komponenten.

[Engel77]

Danke, für deine schnelle Hilfe

die Variants gelöscht und die Eigenschaften die er nicht kennt auch.

die ShDocVw_tlb.dcu

hatte ich nur noch nicht im Suchpfad (hab in den Projekteinstellungen den Suchpfad mit dem entsprechendem Pfad ergänzt)

und jetzt compiliert er und startet das compilierte Programm auch ohne Fehlermeldung.


danke nochmals.

einen schönen Tag wünsche ich dir und auch den anderen

Gruß
Engel

[rabby]

habe wie im thread http://www.delphipraxis.net/internal...t.php?p=661490 beschrieben, das problem, dass onnewwindow nicht jedes neue fenster erwischt bzw. beim klick auf links mit unbekannten targets öffnet sich der IE und nicht ein neuer twebbrowser, wie es bei den "normalen" links der fall ist...

[dtrace]

Hey...super Webbrowser,
habe allerdings noch ein Problem. Wenn ich wahlweise den TMozilla Browser verwende, dann funktionieren einige Sachen nicht wie z.B. das suchen im Webbrowser also das markieren von Wörtern die ich suche!

[toms]

Update: Version 1.3.5:

- Kompiliert unter Delphi 2007

- Einige Codeoptimierungen

- Neues Menü Extras (Demonstrations-Funktionen)
Insert / Add HTML
Click Submit Image
Click a Link by Code
Check a Radiobutton / Checkbox
Execute a Script Function with Params
Get Scrollbar Positions
Check Scrollbar Visibility

- Menü View
Local Folders | Thumbnails etc.

- etc..