Подмена URL в OnBefore
От: Штурман  
Дата: 26.07.05 07:52
Оценка:
Тема может показаться избитой, но решения проблемы я не нашел. На форме имеется WebBrowser. Необходимо при переходе по ссылке грузить один и тот же файл с диска. В OnBeforeNavigate2 меняю URL, но ничего запрашивается все равно старый URL.

procedure TfMain.BrowserBeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
var
  str:string;
begin
  StartPreproc(string(URL));
  str:='file://'+GetCurrentDir+'\'+Conf.Values['OutFile'];
  URL:=str;
end;

Еще интересный момент — после присваивания URL:=str, в str портятся данные. Возможно следует специальные методы присваивания? Но какие?
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.