Discussion :

[ARDILLER]

Bonjour à tous.

Voilà le problème, j'ouvre depuis une application Delphi une page Web comme suit:

ShellExecute(0, 'OPEN', PAnsiChar('http://www.Mon_adresse_web.com'), '', '', 0);

Mais j'aimerais pouvoir ouvrir cette page en lui affectant une position et une taille, et qu'elle apparaisse comme une Pop-up (c'est à dire sans barres de navigation, ni de menus).

Cette procedure ne convenant pas, et grâce à ShaiLeTroll, je compte utiliser la méthode Nvigate2 d'un composant TWebBrowser. Ce qui me conduit à un autre problème, donner à cette procédure un parametre qui puisse convenir :

procedure TWebBrowser.Navigate2(var URL: OleVariant);

Comment transformer mon adresse web (string) en OleVariant ?
Je suis ouvert à toutes propositions.

Merci de m'avoir lu.
Amicalement,
Claude.

[ShaiLeTroll]

J'ignore comment tu peux faire un Popup avec IE via Delphi, mais sinon regarde le TWebBrowser dispo dans Delphi (ou sinon import biblio types de ton IE actulle) et affiche la page via la méthode Navigate2 ...

[ARDILLER]

Merci de ta réponse, ShaiLeTroll.
J'ai trouvé le composant TWebBrowser et la méthode Navigate2, mais j'ignore comment transtyper mes chaines adresse web (''http://www.Mon_adresse_web.com'') et parametres ('height=550,width=700') en OleVariant.

Saurais-tu me venir en aide ?

Claude.
PS: j'ai essayé le classique :
OleVariant('http://www.Mon_adresse_web.com')
sans succès.

[/dev/null]

Tu te prend un pet la tête là :s...
Ce que tu doitfairec'est une form avec un TWebBrowser en Align := AllClient et au OnShow de la form faire un [TWebBrowser].Navigate2 := 'http://www.goole.fr'