Q&A

  • MDI폼에서 자식폼의 캡션을 없애고 판넬로 대신하려고 하는데..
MDI폼에서 자식폼의 켑션을 제거 하고 판넬을 이용하여 켑션을 대신하려고 하는데 물론 부모폼도 캡션은 없습니다...
procedure Tfrm1.createparams(var params: tcreateparams);
begin
inherited createparams(params);
params.Style := params.Style - ws_caption;

end; //타이틀 바를 없앤다..


//판넬을 이용해서 타이틀바를 대신한다..
procedure Tfrm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
  releasecapture;
  sendmessage(frm1.Handle, WM_NCLbuttondown, htcaption,0);
  
end;

근데 여기서 에러가 나오네요...
Access violation Address~~~
이유가 먼지 모르겠어요...

아시는 분들 부탁드립니다..
그럼 오늘도 즐프 하세요...
2  COMMENTS
  • Profile
    배종윤 2002.11.22 20:36
    혹시 타이틀바를 없애고..
    대신 판넬을 타이틀바처럼 사용하시고 싶으신것 아닌가요?
    물론 판넬에서 마우스로 드래그 하면 창이동도 하구요..

    그렇다면 이 게시판에서 한번 검색해보세요..
    그 소스 나와있을겁니다.
    못찾으시면 제가 소스보내드리죠...
  • Profile
    송정철 2002.11.22 22:06
    그냥 폼에서는 그렇게 되는데요...
    MDI품의 자식폼에서 하는 방법은 않나와 있더군요..