Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Non-Transparent background in exe for SysAnimate32
#3
Example.

Function DlgAnim
Code:
Copy      Help
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages

if(!ShowDialog("DlgAnim" &DlgAnim)) ret

;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 250 250 "Dialog"
;3 SysAnimate32 0x54000000 0x0 0 0 96 48 ""
;END DIALOG
;DIALOG EDITOR: "" 0x2020002 "" ""


ret
;messages
sel message
,case WM_INITDIALOG
,int han=id(3 hDlg)
,SetWinStyle han ACS_TRANSPARENT 1
,SendMessage han ACM_OPEN 0 "C:\WINDOWS\clock.avi"
,int from=0 ;;beginning
,int to=-1 ;;end
,int repeat=-1 ;;indefinitely
,SendMessage han ACM_PLAY repeat to<<16|from
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
ret 1

You need QM 2.2.0, or declare the constants etc.


Messages In This Thread

Forum Jump:


Users browsing this thread: 1 Guest(s)