K koko Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-13 #1 小弟初学编程,用mediaplayer控件播放mp3,mediaplayer.length的返回值是文件的毫秒数,如何转换为00:00格式,请哪位仁兄帮忙。
C Croco Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-13 #2 var L, M, S: Integer; Str: String; begin L := MediaPlayer.Length div 1000; M := L div 60; S := L mod 60; Str := Format('%.02d:%.02d', [M, S]); end;
var L, M, S: Integer; Str: String; begin L := MediaPlayer.Length div 1000; M := L div 60; S := L mod 60; Str := Format('%.02d:%.02d', [M, S]); end;