mciSendString 검색 결과

해당 글 2건
오디오 Fade Out 효과 구현

참고 : 지식인 파워포인트 기본 기능으로는 특정 슬라이드에 이르렀을 때 오디오가 페이드아웃되게 만들 수 없습니다. ​ VBA를 이용하면 가능하게 만들 수는 있습니다. ​ MCISendString 이라는 명령을 이용해서 mp3등의 파일을 재생을 하다가 특정 슬라이드에서 볼륨을 3초간 계속 점점 줄이는 명령을 보낸다면 fade out 효과를 낼 수 있습니다. 더보기 Option Explicit #If VBA7 Then Public Declare PtrSafe Function SetTimer Lib "user32" (ByVal hwnd As LongPtr, ByVal nIDEvent As LongPtr, _ ByVal uElapse As Long, ByVal lpTimerFunc As LongPtr) As L..
PPT+VBA 2022. 11. 13. 00:46
실시간 오디오 재생 위치 및 바(Progress bar) 표시

오디오를 MCISendString API를 이용해서 재생/일시정지/재시작/정지할 수 있습니다. 여기서 재생위치를 실시간으로 Timer API를 이용해서 표시하는 예시입니다. MCISendString 명령어 목록: https://docs.microsoft.com/en-us/windows/win32/multimedia/multimedia-command-strings?redirectedfrom=MSDN 실행 영상: 코드 보기: 더보기 Option Explicit #If VBA7 Then Public Declare PtrSafe Function SetTimer Lib "user32" (ByVal hwnd As LongPtr, ByVal nIDEvent As LongPtr, _ ByVal uElapse As Lo..
PPT+VBA 2021. 11. 6. 12:25