XP-Style und TWebBrowser

[daniel8520]

Hallo Leute,

ich vorhin mitbekommen, dass mein TWebBrowser gar nicht den XP-Style annimmt, oder besser gesagt, dass seine Inhalte wie z.B. Button o.ä. den XP-Style nicht annehmen.
Nun hatte ich mir diesen Thread angesehen, aber leider ist die Datei nicht mehr vorhanden.

Kann mir vielleicht weiterhelfen? Oder mir andere Komps nennen, durch welche der TWebBrowser dann den XP-Style annimmt!?

Thx im Voraus

[Misjahx]

http://www.euromind.com/iedelphi/dow...mbedwb116b.zip

Bitte sehr :mrgreen:






PS: www.g00gl3.de hilft :P

[daniel8520]

Ähm, sorry aber aber wenn ich die Unit complilieren will zeigt er ne Menge Fehler an. Wie z.B. Undefn. Bezeichner 'Unassigned'!
Ich muss die Unit doch installieren, oder!?

[Misjahx]

ähm... weiß ich nicht :|


Ich hab dir nur denn Download Link besorgt :mrgreen:

[daniel8520]

Aha! Kann sonst noch jemand auskunft über das, oder andere Komps geben?

[scp]

Das Problem ist, er nimmt die Unit Variants nur in die uses, wenn du D6 hast, bei D7 ist das aber auch nötig:

Delphi-Quellcode:

{$IFDEF VER140}
{$DEFINE DELPHI6}
{$DEFINE DELPHI6UP}
{$ENDIF}

{$IFDEF VER150}
{$DEFINE DELPHI7}
{$DEFINE DELPHI6UP}
{$DEFINE DELPHI7UP}
{$ENDIF}

unit EmbeddedWB;

interface

uses
{$IFDEF DELPHI6UP}Variants, {$ENDIF}

Inder Unit IEUtils musst du das auch entsprechend ändern.

[daniel8520]

Sorry, aber ich hab jetzt nicht ganz verstanden, was ich abändern soll. Kannst du mir dass nochmla genauer sagen?

[daniel8520]

Ich denke, dass ich's hinbekommen habe. zumindest fast: Als erstes wollte er dann MsHTML_tlb.dcu haben, hab ich als Typenbiblo importiert. Dann wollte er SHDocVw_tlb.dcu haben. Hab ich ebenfalss installiert. Und nun sagt er, dass bereits eine Klasse mit dem Namen TWebBrowser existiert.
Was soll ich denn nun machen?

[daniel8520]

Hab's jetzt hinbekommen!
Aber was mich jetzt wundert, ist, dass die Buttons immernoch nicht im XP-Style sind!
:evil:

[tommie-lie]

Manifest eingebunden?

[daniel8520]

Ja hab ich!

[toms]

Hi,

Habe bei Torry mal eine Version hochgeladen, welche den XP Style unterstützt:

http://www.torry.net/quicksearchd.ph...edWb&Title=Yes

[horst]

hallo...habe
http://www.torry.net/quicksearchd.ph...edWb&Title=Yes
installiert...bekomme aber dennoch keinen xp-style im EWB angezeigt.
kann man da noch was falsch machen?
güße
horst

[scp]

Im Objectinspector bei UserInterfaceOptions die Eigentschaft THEME auf true setzen, dann gehts.

[horst]

jepp...funktioniert, danke :)

[scp]

übrigens, wer Probleme mit der Personal hat:
- vclie unter requires rausnehmen

- Bei

Delphi-Quellcode:

function TEmbeddedwb.GetFrame(FrameNo: Integer): IWebbrowser2;

diesen Variablentyp ändern:

Delphi-Quellcode:

  enum: ActiveX.IEnumUnknown;

- Gegebenfalls in der uses SHDocVw und MSHTML in SHDocVw_TLB und MSHTML_TLB ändern