ab.com コミュニティ https://www.activebasic.com/forum/ |
|
音声再生機器の検出 https://www.activebasic.com/forum/viewtopic.php?t=4610 |
ページ 1 / 1 |
作成者: | TISAproject [ 2016年12月19日(月) 22:58 ] |
記事の件名: | 音声再生機器の検出 |
コード: Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String,_ ByVal lpSectorsPerCluster As String, ByVal uReturnLength As Long,_ ByVal hwndCallback As Long) As Long Dim Com As String Dim Back As String Dim unkown As Long Dim Ret As Long Back=String$(255,Chr$(0)) Com="set cdaudio door open" 'もしくは "set cdaudio door Closed" Ret=mciSendString(Com,Back,255,unkown) '・・・・mciSendString(①,②,③,④) If Ret=0 Then MessageBox(0,"開けたよ","mciSendString",MB_OK) Else MessageBox(0,"失敗!","mciSendString",MB_OK) EndIf Endこれを応用して音声再生機器の名前を検出することはできますか? |
作成者: | HSABP [ 2018年12月04日(火) 00:10 ] |
記事の件名: | Re: 音声再生機器の検出 |
音声再生機器とは? どの機器を指すの? 少なくともMCIでは無理じゃないの? |
ページ 1 / 1 | 全ての表示時間は UTC+09:00 です |
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/ |