begin process at 2010 03 20 11:59:01
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

API

 > OUVRIR UNE URL DANS UNE OU PLUSIEURS FENÊTRES, QUEL QUE SOIT LE NAVIGATEUR PAR DÉFAUT

OUVRIR UNE URL DANS UNE OU PLUSIEURS FENÊTRES, QUEL QUE SOIT LE NAVIGATEUR PAR DÉFAUT


 Information sur la source

Note :
9,25 / 10 - par 4 personnes
9,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :API Classé sous :url, ouvrir, navigateur, défaut, fenêtre Niveau :Débutant Date de création :13/09/2003 Date de mise à jour :13/09/2003 00:48:00 Vu / téléchargé :5 272 / 416

Auteur : japee

Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (8)
Ajouter un commentaire et/ou une note


 Description

Cliquez pour voir la capture en taille normale
Ouvrir une fenêtre, voire plusieurs dans le navigateur, c'est facile. Mais tout le monde n'a pas Internet Explorer...
Mieux vaut donc en tenir compte, et déterminer auparavant le navigateur par défaut de l'utilisateur du programme.
NOTE : le résultat de GetDefaultBrowser est le chemin DOS (chemin court).
Cela ne semble pas poser de problème, du moins sous Win 98...
Sinon, jetez donc un coup d'oeil à cette adresse :
http://community.borland.com/article/0,1410,260 83,00.html
J'y ai trouvé la fonction GetDefaultBrowser, que j'ai simplifiée  pour
l'adapter à l'usage que j'en fais ici.    

Source

  • Récupérer le navigateur par défaut :
  • uses ShellApi;
  • function GetDefaultBrowser: String;
  • var
  • PathTmp: PChar;
  • Browser: PChar;
  • begin
  • PathTmp:= StrAlloc(255);
  • Browser:= StrAlloc(255);
  • try
  • GetTempPath(255, PathTmp);
  • FileCreate(PathTmp + 'temp.htm');
  • FindExecutable('temp.htm', PathTmp, Browser);
  • Result := Browser;
  • DeleteFile(PathTmp + 'temp.htm');
  • finally
  • StrDispose(PathTmp);
  • StrDispose(Browser);
  • end;
  • end;
  • Ouvrir l'URL dans le navigateur
  • - dans la même fenêtre :
  • ShellExecute(0, nil, pchar(Url), nil, nil, SW_SHOWNORMAL);
  • - dans une fenêtre différente :
  • ShellExecute(0, nil, pchar(GetDefaultBrowser), pchar(Url), '', SW_SHOWNORMAL)
  • Voir l'exemple avec code source commenté dans le zip !
Récupérer le navigateur par défaut :

uses ShellApi;

function GetDefaultBrowser: String;
var
  PathTmp: PChar;
  Browser: PChar;
begin
  PathTmp:= StrAlloc(255);
  Browser:= StrAlloc(255);
  try
    GetTempPath(255, PathTmp);
    FileCreate(PathTmp + 'temp.htm');
    FindExecutable('temp.htm', PathTmp, Browser);
    Result := Browser;
    DeleteFile(PathTmp + 'temp.htm');
  finally
    StrDispose(PathTmp);
    StrDispose(Browser);
  end;
end;

Ouvrir l'URL dans le navigateur

- dans la même fenêtre :
ShellExecute(0, nil, pchar(Url), nil, nil, SW_SHOWNORMAL);

- dans une fenêtre différente :
ShellExecute(0, nil, pchar(GetDefaultBrowser), pchar(Url), '', SW_SHOWNORMAL)

Voir l'exemple avec code source commenté dans le zip !

    

 Conclusion

Fonctionne parfaitement sous Win 98.
A tester avec les autres versions...
Vos commentaires sont les bienvenus !    

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture DEPLACER LES ITEMS D'UNE LISTBOX VERS UNE AUTRE PAR DRAG AND...
Source avec Zip Source avec une capture DÉMINEUR UTILISANT UNE TDRAWGRID ET AVEC LEQUEL ON PEUT TRIC...
Source avec Zip Source avec une capture SIGNIFICATION DES CODES D'ERREUR DE L'API WIN32 - UTILISATIO...
Source avec Zip Source avec une capture CONVERSION LITTÉRALE D'UN NOMBRE ENTIER OU FLOTTANT
Source avec Zip Source avec une capture TPULSEBUTTON - RÉPÉTITION PROGRESSIVE D'UN EVENT PENDANT ONK...

 Sources de la même categorie

Source avec Zip NEXTGENS -> UNITÉS DE TYPES ÉVOLUÉS NOUVELLE GÉNÉRATION (DE... par f0xi
Source avec Zip Source avec une capture AUTO-COMPLÉTION D'UN CONTRÔLE DE SAISIE par Bacterius
Source avec Zip CARDS GAME SDK 1.0.0.0 par f0xi
Source avec Zip Source avec une capture TRAYICON - VOTRE ICONE DANS LA BARRE DES TACHES par Bacterius
Source avec Zip Source avec une capture WINHIDER _ CACHER UN PROGRAMME DE L'ÉCRAN ET DE LA BARRE DE ... par soldier8514

 Sources en rapport avec celle ci

Source avec une capture VOTRE PROGRAMME DE MAIL COMME CLIENT MAIL PAR DÉFAUT SOUS WI... par MAURICIO
Source avec Zip Source avec une capture GESTION DE CASES À COCHER PERSONNALISÉES DANS UN STRINGGRID par Jean_Jean
Source avec Zip Source avec une capture ENTRÉES SORTIES WAVE ET MIDI par barbichette
Source avec Zip RXRICHEDIT IMAGE, LIENS WEB, SURLIGNER par Magdavich
WEBBROWSER1NEWWINDOW2 - OUVERTURE DE LA NOUVELLE FENÊTRE DAN... par japee

Commentaires et avis

Commentaire de Millenod le 14/09/2003 01:17:47

existe-t-il un exemple de code similaire pour exécuter le navigateur web par défaut sous lunux?

Commentaire de japee le 16/09/2003 10:52:24 administrateur CS

Vu quelque chose de semblable pour Kylix ici :

http://www.developpez.com/kylix/systeme/prog_ext.php

Commentaire de japee le 23/09/2003 14:26:41 administrateur CS

Pas de notes, pas de commentaires, vu 184 fois au 23/09/03, pas de problème, ça "doit le faire", merci de vous avoir rendu service...
Bonne prog' ;-)

Commentaire de Millenod le 23/09/2003 19:01:30

merci pour le shellexecute qui passe sous xp
je testerais la version kylix un de ces 4

Commentaire de _Moise_ le 02/08/2004 17:15:35

Et bien j'ai testé  sous Xp et windows Nt  tout marche parfaitement

Commentaire de japee le 02/08/2004 22:01:52 administrateur CS

Ok, _Moise_, merci du commentaire, alors ça passe partout.
Tant mieux.
D'autant que l'on trouve bien sur le web des sources qui sont sensées traiter le problème, mais qui ne le font pas réellement...
Ce code est le seul à ma connaissance à fonctionner correctement, en lançant réellement le navigateur par défaut, et pas un autre.

Commentaire de hurrycane le 30/06/2006 16:16:05

ca date de longtemps et ca sert encore
c'est ce que j'appelle une source benefique !
her encore jappee j'etait plantee devant le pc qui mouvrait les url dans la meme fenetre ! desarroi total!
autre alternative : getdefaultbrowser + winexec qui elle ouvre toujours sur une nouvelle fentre !

Commentaire de Bacterius le 04/10/2008 11:53:28

En tout cas avec FF3, ça ouvre toujours dans le même onglet.
Et même WinExec n'y fait rien (FF renvoie les paramètres à l'instance existante).
Ca ne marche que quand aucune fenêtre n'est ouverte ^^

Cordialement, Bacterius !

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Ouvrir une fenêtre avec ses dimensions [ par Pilou ] Comment peut on attribuer la taille et position d'une fenêtre qu'on ouvre avec shellexecute ?ShellExecute (handle,'Open', PChar('c:\windows\') ,PChar Ouvrir application par une url [ par darkduck ] Ami programmeur je suis bien embéter.Il y a quelque tps j'ai trouvé dans ce site une source permettant d'ouvrir une application via un lien dans IE.Le Fenêtre "on top" [ par sebastienbro ] Bonjours à tous,Voilà mon application comporte deux forms. Ces deux forms doivent rester visible (donc au dessus de toutes les autres) quelque soit la Multi Fenêtrage [ par lbensch ] Salut,Je souhaiterais faire en sorte dans mon appli d'ouvrir une même fenêtre n fois, et qu'elle apparaisse séparemment, un peu comme W Ouvrir une URL [ par norton ] Bonjour, comment fait-on pour ouvrir une urlEX: http://www.google.comavec internet explorer depui un programme delphi ?j'ai essayé comme ça mais ça n' ShellExecute : ouvrir une page web avec un navigateur précis [ par memphisakeronaleron ] Bonjour, Jaimerai ouvrir une page web avec iexplore.exe voila mon code qui ne me fait rien : ShellExecute(GetDesktopWindow, 'open', 'C:\Program Fi Ouvrir une nouvelle fenêtre dans la barre des tâches de windows [ par Aurel184 ] salut,je programme une application qui permet de discuter avec des potes sur internet. Et mon application ouvre d'autres fenêtres de discussion. Ouvrir une fenêtre windows avec "parcourir" ou "enregistrer sous" [ par FeuerFrei118 ] Bonjour! Je cherche le moyen d'enregistrer ou d'ouvir des fichiers images pour pouvoir après traiter leur propriétés, soit avec une sorte de "parcouri Comment empecher Windows de minimizer une fenêtre [ par Phenix40 ] Salut tout le monde,je veux savoir s'il est possible d'interdir Windows de minimizer une fenêtre qui n'est pas Top-most ? lors de clique sur le bouton Application par défaut (Ouvrir Avec...) [ par darkduck ] comment puis je faire pour que certain fichier de mon choix (ex : *.txt) s'ouvrent tous le temps avec mon programme sans que je n'ai a lancer mon prog


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,045 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales