Delphi | 델파이에서 ie 창 띄우기
페이지 정보
작성자 nuno 쪽지보내기 메일보내기 자기소개 아이디로 검색 전체게시물 작성일13-11-13 17:19 조회11,654회 댓글0건관련링크
본문
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
댓글목록
등록된 댓글이 없습니다.