EmbeddedWeb에서 클릭시 New윈도우가 나올때 막고 내가 원하는 EmbededWeb에 띄우기.

EmbeddedWeb에서 클릭시 New윈도우가 나올때 막고 내가 원하는 EmbededWeb에 띄우기.
EmbededWeb에서 OnNewWindows3 이벤트에서 다음과 같은 작업을 합니다.

procedure TFRM.EmbeddedWB1NewWindow3(ASender: TObject; var ppDisp: IDispatch;
  var Cancel: WordBool; dwFlags: Cardinal; const bstrUrlContext,
  bstrUrl: WideString);
begin
  Cancel := True;    // 새로운 Explorer창을 띄우지 못하도록 합니다.
  EmbeddedWB2.Go( bstrUrl  );   // URL을 내가 원하는 곳으로 출력합니다.
  Inc( clickCount );
end;

도움되시길..

Author: yyjksw