보기
IE의 URL로 연결되도록 구현 하는 방법에 대한 답변입니다~!
작성일2016-07-18 오후 10:07:57
- no : 42
- 작성자 : SYCODE
- 조회 : 3489
Button을 클릭하면 Internet Explorer의 URL로 연결되도록 구현 하는 방법에 대한 답변입니다~!
브라우저 실행하기(1)
기존의 창이 있다면 기존에 창에 명령이 적용되며 새탭이 생기면서 인터넷이 연결된다. 창이 없다면 새창을 열며 본복클릭시 계속 현재창이 갱신됩니다. uses절에 UrlMon 을 추가해야 합니다.
begin
HlinkNavigateString(nil, 'http://devgear.co.kr'); // uses절에 UrlMon추가
end;
브라우저 실행하기(2)
실행시 무조건 새브라우저가 열립니다.
하지만 브라우저사이즈는 제어못합니다.
begin
winexec('explorer http://devgear.co.kr',1);
end;
브라우저 실행하기(3)
원하는 사이즈로 익스플로어창 실행이 가능합니다.
ole객체를 이용하여 익스플로어창을 새창으로 실행합니다.
ole관련 객체는 variant형으로 선언합니다.
실행시 무조건 새브라우저가 열립니다.
ole관련 객체 선언시에 ComObj 을 uses 해야 합니다.
const
strURL ='http://devgear.co.kr';
var
IE: Variant;
begin
IE := CreateOle
IE.Width := 800;
IE.Height := 600;
IE.Navigate(strURL);
IE.Visible := True;
end;
브라우저 실행하기(1)
기존의 창이 있다면 기존에 창에 명령이 적용되며 새탭이 생기면서 인터넷이 연결된다. 창이 없다면 새창을 열며 본복클릭시 계속 현재창이 갱신됩니다. uses절에 UrlMon 을 추가해야 합니다.
begin
HlinkNavigateString(nil, 'http://devgear.co.kr'); // uses절에 UrlMon추가
end;
브라우저 실행하기(2)
실행시 무조건 새브라우저가 열립니다.
하지만 브라우저사이즈는 제어못합니다.
begin
winexec('explorer http://devgear.co.kr',1);
end;
브라우저 실행하기(3)
원하는 사이즈로 익스플로어창 실행이 가능합니다.
ole객체를 이용하여 익스플로어창을 새창으로 실행합니다.
ole관련 객체는 variant형으로 선언합니다.
실행시 무조건 새브라우저가 열립니다.
ole관련 객체 선언시에 ComObj 을 uses 해야 합니다.
const
strURL ='http://devgear.co.kr';
var
IE: Variant;
begin
IE := CreateOle
IE.Height := 600;
IE.Navigate(strURL);
IE.Visible := True;
end;