자 보통 인터넷을 띄우려면

Shell "explorer 인터넷주소"

 

를 쓰면 되지요

 

이것도 편하긴하지만 새창이뜬다는 단점이있지요~

 

그래서 하나 준비했습니다

 

비베를 실행시키시구요

 

Ctrl + T를 눌러줍니다 구성요소 창이뜨지요`?

 

 

M을눌러서 MicroSoft Internet controls를 찾습니다

 

체크해주시고 확인 눌러주세요~그럼 왼쪽 도구모음에

 

새로운 버튼이 하나 생긴걸 알수있습니다 지구모양이구요

 

개체명은 WebBroweser이지요~ 눌르신후

 

폼에 원하는 크기만큼 늘려서 생성해주새요~ (인터넷창이 보여질 크기만큼)

 

자 하나만들었다고치고 그개체명을 WebBrower1이라고 가정합니다~!

 

Command Button이 눌렸을때 해당 사이트가 뜨게하려면

Private Sub Command1_Click()

WebBrowser1.Navigate " 해당 URL "

End Sub

 

이런식으로 입력해주심 되구요~ 간단하죠? 예제하나 올려봅니다

 

키쿄우작성-

이 게시물을...
profile

User Delphi Project 의 마스터입니다!

(프로필 사진을 추가해보세요 ㅇㅅㅇ) /