引数で指定されたトラックを読み込みます。
var reader = Application.CreateCdReader();
// 全トラック読み込み
var clips = reader.CreateSoundClips();
clips = clips.toArray();
// 波形グラフを与える.
var i;
for (i in clips)
Application.Documents.AddSoundClip(clips[i]);
Dim reader, clips, c
Set reader = Application.CreateCdReader
' 全トラック読み込み
clips = reader.CreateSoundClips
' 波形グラフを与える.
For Each c In clips
Application.Documents.AddSoundClip(c)
Next
Sazanami Help
Copyright (c) 2023 Narumi Watanabe.
All Rights Reserved.