Visual Basic, C & C++
Delphi 분류

델파이에서 ie 창 띄우기

컨텐츠 정보

본문

uses 
  ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var                                            // uses 구문에 'ComObj'를 추가
  IE: Variant; 
  WinHandle: HWND; 
begin 
  if VarIsEmpty(IE) then 
    begin
      IE := CreateOLEObject('InternetExplorer.Application');
      IE.Visible := True;
      IE.Navigate('http://www.nuno21.net/');
    end
  else
    begin
      WinHandle := FindWindow('IEFrame', nil);

      if 0 <> WinHandle then
        begin
          IE.Navigate('http://www.nuno21.net/');
          SetForeGroundWindow(WinHandle);
        end;
    end;

end;
end.

관련자료

댓글 0
등록된 댓글이 없습니다.
Today's proverb
이슬비가 내리고 있다. 당신은 밖에 나가서 우산을 편다. 그것으로 충분하다.“구질구질하게 또 비가 오는군!” 이런 말을 한들 무슨 소용이 있는가. 비도, 구름도, 바람도 결코 마음대로 되지 않는데 어째서 “비 한번 시원스럽게 내리는군”하고 말하지 못하는가. <<날마다 행복해지는 255가지 이야기>> (알랭)