Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Internet Explodierer via COM/OLE ansprechen? (https://www.delphipraxis.net/123602-internet-explodierer-via-com-ole-ansprechen.html)

Errraddicator 5. Nov 2008 08:02


Internet Explodierer via COM/OLE ansprechen?
 
Hiho,

ist es wohl möglich, den Internet Explodierer (ähnlich wie Excel z.B.) via COM oder OLE fernzusteuern?

Hintergrund is der, dass ich in einigen meiner Programme Drucklisten als XML-Dateien erstellen.
Dahinter liegt ein XSL-Stylesheet und man kann sich das Ganze dann supi-dolle am Bildschirm mittem IE angucken.
Soweit, so gut!

Nur sind das wie gesagt auch gleichzeitig die Listen die auffen Drucker sollen und das muss man dann logischerweise immer manuell machen.
Viel schöner wäre es jedoch, wenn das irgendwie automatisch gehen würde, alleine schon wegen den Seiteneinstellungen,
die man jedes Mal vornehmen muss.

Hat da irgendwer ne Idee, oder Anhaltspunkte?


Besten Dank im Voraus

cu Patrick

Bernhard Geyer 5. Nov 2008 08:04

Re: Internet Explodierer via COM/OLE ansprechen?
 
TWebBrowser ist der Wrapper dafür.

mkinzler 5. Nov 2008 09:24

Re: Internet Explodierer via COM/OLE ansprechen?
 
Späte Bindung sollte aber auch funktionieren

toms 5. Nov 2008 09:27

Re: Internet Explodierer via COM/OLE ansprechen?
 
Zitat:

Zitat von mkinzler
Späte Bindung sollte aber auch funktionieren

Delphi-Quellcode:
uses
  ComObj, SHDocVw{_TLB};

procedure OpenIE(Url, Flags, TargetFrameName, PostData, Headers: OleVariant);

var
  ie: IWebBrowser2;
begin
  ie := CreateOleObject('InternetExplorer.Application') as IWebBrowser2;
 { ie.Left := 120;
  ie.Top := 120;
  ie.Width := 700;
  ie.Height := 500; }
  ie.MenuBar := False;
  ie.AddressBar := False;
  ie.Resizable := False;
  ie.StatusBar := False;
  ie.ToolBar := 0;
  ie.Navigate2(Url, Flags, TargetFrameName, PostData, Headers);
  ie.Visible := True;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  OpenIE('www.delphipraxis.net','','','','');
end;

Errraddicator 5. Nov 2008 12:19

Re: Internet Explodierer via COM/OLE ansprechen?
 
Habs mit TWebBrowser hinbekommen, Danke! :)


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:43 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz