VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2005/03/25(Fri) 19:49
投稿者おじん
Eメール
URL
タイトルwavファイルの演奏時間の求め方

MMControlを利用した場合の例で、

  MMControl1.FileName = fname$
  MMControl1.Command = "Open"
  MMControl1.TimeFormat = 1
  secdata = MMControl1.Length / 1000
  Print "Total Time = ", Format(secdata, "#0.0") & "  Sec"
;

を参考書で知りました。で、
  MMControl1.TimeFormat = 1 の 1は、mciFormatHmsで、その説明は、
「時、分、および秒形式をパックして長整数の値で表します。
各データの順序は次のとおりです。
時 (最下位バイト) 分 秒 未使用 (最上位バイト)」とありました。

ならば、2バイトずつ、未使用、秒、分、時に成っている?なら、
「秒」にするなら10000で割らなくてはいけないのでは?
説明文にある意味合いがわかりません。パックして長整数の値とは?

また、MMControlを使用しないで、ファイルの長さを調べる方法は?
例えば、ファイル識別情報(RIFF)から知る方法はありませんか?

いつもの事ながら、質問の内容が伝わりましたら、お願いします。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -