안녕하세요. TWebBrowser를 이용해서 작은 프로그램을 만들고 있는데 많이 막히네요^^
델파이 6에 CoolTray를 사용하고 있습니다.
1. 자식폼이 TWebBrowser을 리로드하면 스크롤바가 나타납니다.
TWebBrowser에서 게시물을 클릭하면 익스플로러 새창을 띄운 후 새창에서 닫기를
클릭하면 데이터베이스에 읽었다고 처리를 한 후 TWebBrowser를 리로드하는데 스
크롤바가 나타납니다.
TWebBrowser에서 직접 웹페이지를 호출할때는 아래와 같이 매번 스크롤바를
숨겨주는데 자식폼이 리로드할때는 스크롤바가 나타나서 화면이 이상해지는데
방법이 없을가요?
try
WebBrowser.Navigate(NewsInfo.URL_HTTP + NewsInfo.URL_USER);
while WebBrowser.ReadyState <> READYSTATE_COMPLETE do
Application.ProcessMessages;
WebBrowser.OleObject.Document.Body.Style.OverflowY := 'hidden';
WebBrowser.OleObject.Document.Body.Style.OverflowX := 'hidden';
except
end;
2. MainForm BorderStyle 이 None일때 TWebBrowser 안의 보이는 HTML들이 클릭되지
않습니다.
테스트하면서 찾은 특이한 점은 None을 제외한 사이즈어블이나 싱글등은 클릭이
잘되고요.
None일 경우 트레이에 숨었다가 화면이 복구되었을때 클릭이 한번 되네요.
그 후에는 클릭이 되지를 않습니다. 다시 트레이에 숨겼다가 화면 복구하면 클릭
이 또 한번 됩니다. ㅜㅜ
Main폼에는 패널 3개와 Top과 Bottom은 Image만 올라가 있고,
가운데 Client 패널에 TWebBrowser가 Client로 올라가있습니다.
답변 꼭 부탁드릴께요 ㅠㅠ
해결을 위해 시도해본 내용 (실패)
SetWindowLong( Handle, GWL_STYLE, GetWindowLong( Handle, GWL_STYLE ) and not WS_CAPTION ) ;
WS_CAPTION을 STYLE에서 빼고 해 보았습니다.
|