BeforeNavigate avec TEmbeddedWB - Delphi/Pascal - Programmation
Marsh Posté le 08-01-2003 à 22:19:48
Bonjour, Comment remplacer une page par une autre avec BeforeNavigate ? La methode suivante ne donne pas de résultat. procedure Tform1.TWBBeforeNavigate2 (Sender: TObject; const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData, Headers: OleVariant; var Cancel: WordBool); begin if pos ('comclick', LowerCase (URL)) > 0 then URL := 'http://www.voila.fr; end; Merci de vos réponses et BONNE ANNEE à tous. Fernando
Make sure you enter the(*)required information where indicate.HTML code is not allowed
Marsh Posté le 08-01-2003 à 22:19:48
Bonjour,
Comment remplacer une page par une autre avec BeforeNavigate ?
La methode suivante ne donne pas de résultat.
procedure Tform1.TWBBeforeNavigate2 (Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
begin
if pos ('comclick', LowerCase (URL)) > 0 then
URL := 'http://www.voila.fr;
end;
Merci de vos réponses et BONNE ANNEE à tous.
Fernando