Discussion :

[asuka_l2]

Bonjour,

Je développe sous Delphi 2006 et j'utilise le composant TWebBrowser. Dans mon programme, j'ai besoin à un moment d'afficher des pages à l'utilisateur sans qu'il puisse intérargir avec elles. J'ai donc écris:

MyWebBrowser.Enabled := false;

Dans ce cas l'utilisateur ne peut plus accéder aux champs texte de ma page mais peut toujours cliquer sur les liens, modifier des checkBox etc.
Est-ce que quelqu'un saurait comment on peut afficher des pages dans le composant TWebBrowser en empêchant l'utilisateur de faire quoique ce soit à partir ce ces pages ?

Merci beaucoup.

[nihao]

Avec un boolean et l'évènement onBeforeNavigate2

par exemple une variable bloque initialisée à true si tu veux bloquer par défaut ou à false sinon. Ensuite dans le gestionnaire de l'évènement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
begin
       cancel := bloque;
       bloque := true;
end;

Pour afficher une nouvelle page :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
bloque := false;
webbrowser1.navigate(URL_de_la_page);

bon code !!

[asuka_l2]

C'est génial ça marche nickel !!!
beaucoup Nihao !!!