|
-
Aug 15th, 2000, 05:13 AM
#1
Thread Starter
Frenzied Member
Hello!
I have two Q's that I hope all you gurus can help me with : o )
1) How can I retrieve the fileinfo from an MP3 file?
2) How can I sound a tone from the speaker? I have tried using the 'Beep' statement, but I only get the 'Pling' sound from Windows.....
Thanx in advance!
-
Aug 15th, 2000, 05:59 AM
#2
you could use these API's
Code:
Public Declare Function GetFileAttributes Lib "kernel32" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long
Public Declare Function GetFileSize Lib "kernel32" Alias "GetFileSize" (ByVal hFile As Long, lpFileSizeHigh As Long) As Long
Public Declare Function GetFileTime Lib "kernel32" Alias "GetFileTime" (ByVal hFile As Long, lpCreationTime As FILETIME, lpLastAccessTime As FILETIME, lpLastWriteTime As FILETIME) As Long
Public Declare Function GetFileTitle Lib "comdlg32.dll" Alias "GetFileTitleA" (ByVal lpszFile As String, ByVal lpszTitle As String, ByVal cbBuf As Integer) As Integer
Public Declare Function GetFileType Lib "kernel32" Alias "GetFileType" (ByVal hFile As Long) As Long
Public Declare Function GetFileVersionInfo Lib "version.dll" Alias "GetFileVersionInfoA" (ByVal lptstrFilename As String, ByVal dwHandle As Long, ByVal dwLen As Long, lpData As Any) As Long
-
Aug 15th, 2000, 06:00 AM
#3
oops forgot a UDT
Code:
Public Type FILETIME
dwLowDateTime As Long
dwHighDateTime As Long
End Type
-
Aug 15th, 2000, 07:08 AM
#4
transcendental analytic
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
Aug 15th, 2000, 10:13 AM
#5
Frenzied Member
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|