Q&A

  • BitmapRgn으로 플래쉬모양으로 폼깍기에서요..
델마당의 강좌를 보고 해보는데요...

<폼에 플레시 콘트롤 얹어놓고 플레시 애니메이션 모양대로 폼을 깍기 ^^ >
http://www.delmadang.com/cwb-bin/CrazyWWWBoard.exe?db=dmdlec3&mode=read&num=1755&page=1&backdepth=1

관련 팁
<CreateBitmapRgn>
http://www.delmadang.com/cwb-bin/CrazyWWWBoard.exe?db=dmdlec3&mode=read&num=2788&page=1&backdepth=1

플래쉬의 모양대로 폼은 깍기는데요... 플래쉬가 플레이되는 위치가
아래로 밀립니다... 원인을 나름대로 생각해봤더니

메인폼의 타이틀바 때문인거같더라구요...
그래서 메인폼의 BorderStyle을 bsNone으로 바꿔봤더니
폼 자체가 안나오더라구요 OTL

환경은 XP pro sp2 Delphi5 환경입니다...
소스와 실행파일도 같이 포함합니다...

아참 글구 BitmapRgn.pas에서
델5에는 없는 PCardinal이 있어서

type
...
PCardinal = ^Cardinal;

추가 해줬습니다...

플래쉬 속성에서 고쳐야하는건지 ㅡㅜ
고수님의 따스한 손길을 기다리겠습니다..
2  COMMENTS
  • Profile
    석주현 2005.02.22 09:18
    아 피카추 귀엽네요..

    음 그냥 아래 처럼 하니 잘 되긴 한데... 맞는건지는 저도 모르겠네여..
    뭐 일단 모양 잡기 전에 bsnone 으로 해주면되는거 같은데.. ^^

    procedure TForm1.FormCreate(Sender: TObject);
    begin
      Width:=0;

      Bitmap := TBitmap.Create;
      Bitmap.PixelFormat := pf24bit;
      Bitmap.Width := Flash1.Width;
      Bitmap.Height := Flash1.Height;

      LoadFlash;
      Form1.BorderStyle := bsNone; // 여기 고친 부분 입니다.. ^^

      StartFlashMsgHook;
    end;

    이렇게 해서 해보니 잘되더군요...
    그럼 이만..

    덕분에 재미있는거 봤네요.. ^^
  • Profile
    차가운바람 2005.02.22 21:24
    그런데 거참 신기하네요...
    보더 스타일을 잡아주고 가면 왜 안나왔던걸까요?

    암튼 느므느므 감사합니다...