Petit exercice de vacances..
SimpleWeb n'est pas un nouveau groupe de rock...
C'est simplement un tout petit programme récupéré d'une démo de
EmbeddedWebBrowser :
Documentation and updated versions:
http://www.bsalsa.com
Le lien précédant étant mort je vous donne celui ci en remplacement (Cirec)
http://sourceforge.net/projects/embeddedwb/?source=pdlp
Ce Zip semble plus récent et plus complet que le précédant (Cirec)
http://tinyurl.com/oo799bu
Il faut donc installer le package de composants située à l'adresse indiquée..
SimpleWeb est donc un navigateur à onglets complètement dépouillé et rapide qui récupère votre liste de favoris.
J'ai simplement introduit la possibilité de fermer les onglets (sur clic-droit) qui se créent automatiquement pour chaque
nouveau lien si toutefois vous avez coché la case.
Ce programme est en freeware à condition de préciser l'adresse de son créateur.
Les autres composants offrent par ailleurs beaucoup d'autres possibiltés donnant un sacré coup de vieux à notre
TWebBrowser...
Chacun pouvant modifier ou agrémenter ce soft à sa convenance.
cantador
le lien fourni nous envoie vers un site chinois !
oui, c'est le TSecurityManager qui permet de bloquer 4 ou 5 options (activeX, java, etc..)
En tout cas, bonne contination sur les idées émises..
cantador
Remplacer le ShellExecute par l'appel de ton WebBrowser dans la même fenêtre (ou dans un onglet ou dans une autre fenetre)
ça peut être sympa
Pourquoi pas un petit Deezer (à voir au niveau des droits tout de même)
ou encore un browser Cooliris pour visualiser photos(ça doit être plu chaud à faire mais peut pas)
à tester au niveau de la rapidité
j'ai été faire un tour sur bsalsa.com, y a un composant secure je regarderai ce qu'il fait
à suivre donc et merci pour l'adresse bsalsa.com je ne connaissais absolument pas mais ça m'a l'air plutot bien
{================================================================================}
procedure TF_ORG.Lb_GoogleMapsClick(Sender: TObject);
var URL : string;
Adresse, CP, Ville : string;
begin
// Org est l'abréviation de Organisation (ou Tiers, Socièté, Client, Fournisseur etc....)
Adresse:= '';
CP:='';
Ville:='';
If DM_Main.IBQueryOrg.FieldValues['ADR1']<> null then
Adresse:= DM_Main.IBQueryOrg.FieldValues['ADR1'];
If DM_Main.IBQueryOrg.FieldValues['ADR2']<> null then
Adresse:= Adresse + ' , ' + DM_Main.IBQueryOrg.FieldValues['ADR2'];
If DM_Main.IBQueryOrg.FieldValues['ADR3']<> null then
Adresse:= Adresse + ' , ' + DM_Main.IBQueryOrg.FieldValues['ADR3'];
If DM_Main.IBQueryOrg.FieldValues['CP']<> null then
CP:=DM_Main.IBQueryOrg.FieldValues['CP'];
If DM_Main.IBQueryOrg.FieldValues['COMMUNE']<> null then
Ville:=DM_Main.IBQueryOrg.FieldValues['COMMUNE'];
URL := 'http://maps.google.fr/maps?f=q&hl=fr&q=';
URL := URL + Adresse + ' ,+ ' + CP + '+' + Ville;
ShellExecute(GetDesktopWindow(), 'open', PChar(URL),
nil, nil, SW_SHOWNORMAL);
"pour intégrer un browser dans son application"
ce n'était pas tout à fait le but de ce dépôt mais plutôt au contraire
de concevoir son propre navigateur
mais il peut aussi effectivement s'intégrer dans une application de la même
façon que Le TWebBrowser le fait aussi mais avec tout un emsemble de
fonctionnalités supplémentaires fournies grâce aux autres composants de la palette.
En ce qui concerne la sécurité, je t'avouerai n'y avoir pas réfléchi..
mais je pense que cela ne devrait pas poser de souci puisque dès l'instant où ton navigateur est
déclaré tous les outils classiques, c'est-à-dire tous les anti-quelque chose doivent s'adapter.
ce programme fonctionne sous D5 à D2009
et tu as un forum de discussion sur ce package.
merci et bon coding
cantador
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.