그건 이미 잘 알려진 Delphi 버그 입니다.

본 자료실, Q/A, 또는 borland.public.delphi.activex.controls.writing 뉴스그룹을 검색해보면 어떻게 패치해야 하는지 자세하게 나와 있습니다.



자세하게 말해서, AxCtrls.pas를 패치해서 컴파일하면 AxCtrls.dcu가 새롭게 나오는데, 이것을 Borland/Delphi5/Lib 폴더에 엎어치기 하면 됩니다.







장준혁 wrote:

> 안녕하세요..

>

> 델파이 액티브 폼으로 액티브 컨트롤을 하나 만들어야 합니다. IE 5.0에서 쓸 예정이고요.

> 별 문제 없이 잘 만들고 있는데, 우연히 IE 창을 작게 만들어서 스크롤 하니까 컨트롤 화면이 우장창 깨지는 군요.. --;

> 전에 만들었던 컨트롤도 그런가 확인해 보니 역시.. 델파이로 만든 액티브 컨트롤은 모두다 깨집니다..

>

> 자세한 상황을 말씀드리면,

>

> 컨트롤 width=500, height=600 일 때,

> IE 창을 그 이하의 크기로 만들면 IE 자체에 스크롤 바가 생기잖아요..

> 이때 스크롤을 시도하면 컨트롤 내부 화면만 밀리듯이 해서 깨져버립니다.

>

> Win98, Win2k 모두.. --;

>

> IE 버근가 싶어서 VB랑 VC로 만들어 보니 아무 이상 없더군요.. --;

> 저만 이런가 싶어서 옆에 윈도우 금방 깔은 따끈따끈한 컴퓨터에서 해봐도 역시.. --;

>

> 코드에 뭐 특별한 게 있는 것도 아닙니다.. 맨 액티브 폼에다가 레이블 두어개,

> 입력필드 두어개 올려 놓은 것 밖에 없는데.. 제발.. 부탁합니다.. 도와주세요.. 고수님들..

>

> 으아.. 큰일입니다.. 이런 기본적인 것두 제대로 안되니 원..

> 제발.. 델파이로도 액티브 컨트롤 잘 만들어 쓸 수 있단 걸 보여주세요...

>

> 도와주세요.. 저 비주얼 씨 배우기 싫어요.. T.T

> 사람하나 살리는 셈 치구.. 제발 도와주세요.. 비주얼씨 같은 거 쓰면서 어떻게 살아요..

http://www.delphi.co.kr/cgi-bin/cwb/CrazyWWWBoard.cgi?mode=read&num=17522&db=newqa&fval=깨&backdepth=1



장준혁 wrote:

> 안녕하세요..

>

> 델파이 액티브 폼으로 액티브 컨트롤을 하나 만들어야 합니다. IE 5.0에서 쓸 예정이고요.

> 별 문제 없이 잘 만들고 있는데, 우연히 IE 창을 작게 만들어서 스크롤 하니까 컨트롤 화면이 우장창 깨지는 군요.. --;

> 전에 만들었던 컨트롤도 그런가 확인해 보니 역시.. 델파이로 만든 액티브 컨트롤은 모두다 깨집니다..

>

> 자세한 상황을 말씀드리면,

>

> 컨트롤 width=500, height=600 일 때,

> IE 창을 그 이하의 크기로 만들면 IE 자체에 스크롤 바가 생기잖아요..

> 이때 스크롤을 시도하면 컨트롤 내부 화면만 밀리듯이 해서 깨져버립니다.

>

> Win98, Win2k 모두.. --;

>

> IE 버근가 싶어서 VB랑 VC로 만들어 보니 아무 이상 없더군요.. --;

> 저만 이런가 싶어서 옆에 윈도우 금방 깔은 따끈따끈한 컴퓨터에서 해봐도 역시.. --;

>

> 코드에 뭐 특별한 게 있는 것도 아닙니다.. 맨 액티브 폼에다가 레이블 두어개,

> 입력필드 두어개 올려 놓은 것 밖에 없는데.. 제발.. 부탁합니다.. 도와주세요.. 고수님들..

>

> 으아.. 큰일입니다.. 이런 기본적인 것두 제대로 안되니 원..

> 제발.. 델파이로도 액티브 컨트롤 잘 만들어 쓸 수 있단 걸 보여주세요...

>

> 도와주세요.. 저 비주얼 씨 배우기 싫어요.. T.T

> 사람하나 살리는 셈 치구.. 제발 도와주세요.. 비주얼씨 같은 거 쓰면서 어떻게 살아요..

답변 정말루 고맙습니다.. 역시 델파이의 파워는 사용자들의 힘이 아닐까 합니다. ^^

그런데 몇가지 궁금한게 더 있습니다.. 제발.. 이것두 답변을...



우선 axctrls.pas를 새로 컴파일하려면 어떻게 해야 하죠? 방법을 몰라서.. ^^

그런데 그렇게 컴파일 하면 만일 VCL50.BPL을 따로 쓰기로 한 경우

(Compile with Runtime Library 옵션 사용해서) 문제가 여전하지 않을까요?



그래서 이방법 보다 Panel하나를 띄우는 방법을 써보려고 하는데요.. 잘 안되네요..

더 화려하게 깨지는데요.. 자세히 가르쳐 주세요.. 부탁드립니다..



다시한번 정말 정말 고맙습니다.



p.s. 다음 분들을 위해 이전 질/답 내용을 같이 올립니다. (제목이 이상해서 찾기 어렵더군요)



최석기 wrote:

> bohemian wrote:

> > Active Form을 만들고, 웹브라우저로 볼때

> > 웹브라우저의 스크롤바를 사용해서 안보이는

> > 부분까지 보고자하면 스크롤이 되면서 화면이

> > 깨져버립니다.

> >

> > 왜그럴까요?

> >

>

> 델파이 4에서는 않그랬는데 델파이 5에서는 그러더군요..

>

> 델파이 버그예요..

>

> 저두 예전에 그 현상 때분에 고생했는데 여기 저기 물어봐도 아시는 분이 않 계시더군요.

>

> 그래서 외국에 뉴스 그룹 뒤지다 알아냈어요..

>

> 델파이 Lib 소스를 수정해야 되요.

>

> axctrls.pas에

>

> function TActiveXControl.SetObjectRects(const rcPosRect: TRect;

> const rcClipRect: TRect): HResult;

> begin

> try

> FWinControl.BoundsRect := rcPosRect;

> Result := S_OK;

> except

> Result := HandleException;

> end;

> end;

>

> 부분을 다음과 같이 수정하면 됨.

>

> function TActiveXControl.SetObjectRects(const rcPosRect: TRect;

> const rcClipRect: TRect): HResult;

> var

> WinRect: TRect;

> begin

> try

> IntersectRect(WinRect, rcPosRect, rcClipRect);

> // BEGIN FIX

> WinRect := Bounds(rcPosRect.left, rcPosRect.Top,

> WinRect.Right - WinRect.Left + rcClipRect.Left - rcPosRect.Left,

> WinRect.Bottom - WinRect.Top + rcClipRect.Top - rcPosRect.Top);

> // END FIX

> FWinControl.BoundsRect := WinRect;

> Result := S_OK;

> except

> Result := HandleException;

> end;

> end;

>

> 아니면 ActiveX 메인 폼 위에 Panel을 하나 전체로 놓으시고 그 Panel에 다른 일반 폼을 띄워서 그 일반 폼이 메인 폼 인것 같이 속이시면 되는데...

장준혁 wrote:

> 답변 정말루 고맙습니다.. 역시 델파이의 파워는 사용자들의 힘이 아닐까 합니다. ^^

> 그런데 몇가지 궁금한게 더 있습니다.. 제발.. 이것두 답변을...

>

> 우선 axctrls.pas를 새로 컴파일하려면 어떻게 해야 하죠? 방법을 몰라서.. ^^

> 그런데 그렇게 컴파일 하면 만일 VCL50.BPL을 따로 쓰기로 한 경우

> (Compile with Runtime Library 옵션 사용해서) 문제가 여전하지 않을까요?

>

> 그래서 이방법 보다 Panel하나를 띄우는 방법을 써보려고 하는데요.. 잘 안되네요..

> 더 화려하게 깨지는데요.. 자세히 가르쳐 주세요.. 부탁드립니다..

>

> 다시한번 정말 정말 고맙습니다.

>

> p.s. 다음 분들을 위해 이전 질/답 내용을 같이 올립니다. (제목이 이상해서 찾기 어렵더군요)

>

> 최석기 wrote:

> > bohemian wrote:

> > > Active Form을 만들고, 웹브라우저로 볼때

> > > 웹브라우저의 스크롤바를 사용해서 안보이는

> > > 부분까지 보고자하면 스크롤이 되면서 화면이

> > > 깨져버립니다.

> > >

> > > 왜그럴까요?

> > >

> >

> > 델파이 4에서는 않그랬는데 델파이 5에서는 그러더군요..

> >

> > 델파이 버그예요..

> >

> > 저두 예전에 그 현상 때분에 고생했는데 여기 저기 물어봐도 아시는 분이 않 계시더군요.

> >

> > 그래서 외국에 뉴스 그룹 뒤지다 알아냈어요..

> >

> > 델파이 Lib 소스를 수정해야 되요.

> >

> > axctrls.pas에

> >

> > function TActiveXControl.SetObjectRects(const rcPosRect: TRect;

> > const rcClipRect: TRect): HResult;

> > begin

> > try

> > FWinControl.BoundsRect := rcPosRect;

> > Result := S_OK;

> > except

> > Result := HandleException;

> > end;

> > end;

> >

> > 부분을 다음과 같이 수정하면 됨.

> >

> > function TActiveXControl.SetObjectRects(const rcPosRect: TRect;

> > const rcClipRect: TRect): HResult;

> > var

> > WinRect: TRect;

> > begin

> > try

> > IntersectRect(WinRect, rcPosRect, rcClipRect);

> > // BEGIN FIX

> > WinRect := Bounds(rcPosRect.left, rcPosRect.Top,

> > WinRect.Right - WinRect.Left + rcClipRect.Left - rcPosRect.Left,

> > WinRect.Bottom - WinRect.Top + rcClipRect.Top - rcPosRect.Top);

> > // END FIX

> > FWinControl.BoundsRect := WinRect;

> > Result := S_OK;

> > except

> > Result := HandleException;

> > end;

> > end;

> >

> > 아니면 ActiveX 메인 폼 위에 Panel을 하나 전체로 놓으시고 그 Panel에 다른 일반 폼을 띄워서 그 일반 폼이 메인 폼 인것 같이 속이시면 되는데...

>

>



일단 BPl을 따로 런타임 라이브러리로 사용하더라도 소스 자체를 다시 컴파일 하여 BPL이 생성 되서 상관 없을꺼 같네요..



그리고 Panel에 편법으로 사용하는 방법은 제가 자료실에 ActivX Form에서 MDI 흉내내는 소스 올려 놓은거 참고 하시면 되는데..



일반 폼으로 메인 폼을 만드시고 ActiveX Form에 alClient로 Panel을 하나 배치해서 일반으로 구성한 메인폼의 Parent를 ActiveX Form에 alClient로 Panel로 잡으시면 일반 폼이 Panel 안으로 들어가 집니다..



그런 식으로 사용 하시면 될텐데요..

덕분에 프로젝트를 차질없게 진행할 수 있게 되었습니다.



답변 정말 고맙습니다.