Delphi 분류
델파이에서 ie 창 띄우기
컨텐츠 정보
- 36,043 조회
- 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
등록된 댓글이 없습니다.
