Ai gioi Win Api giup gium tui

[hunken_captain]

Có ai biết hàm mciSendString trong WinAi dùng làm gì không chi dùm tui với, các bạn có thể nêu cho tui biết rõ tham số của hàm ấy dùng làm gì được không và các tác dụng của hàm này , và nó dùng để làm gì, cám on nhiều.

[boya]

Hay Download sourcecode cua HDSOFT (o bai viet cu ...trang 2,3.. gi do ) ve nghien cuu . No su dung ham mcisendstring do ...

[xeko]

Hay down cái >900 hàm API về có nói đầy đủ còn vidụ nữa đó

[haitu]

Nói về hàm trong winapi thì rất khó mà giải thích được trừ khi bạn hiểu rõ về nó, bạn có thể ra nhà sách Minh Khai tìm mua quyển win api đi.

[infoc]

'This project needs a Common Dialog box, named 'CDBox'
' (To add the Common Dialog Box to your tools menu, go to Project->Components (or press CTRL-T)
' and select Microsoft Common Dialog control)
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Dim Alias As String
Private Sub Form_Load()
Const PlayTime = 10
'Set the common dialog box' title
CDBox.DialogTitle = "Choose your midi-file"
'Set the filter
CDBox.Filter = "Midi-files (*.mid)|*.mid"
'Show the 'Open File'-dialog
CDBox.ShowOpen
'Extract an alias from the file
Alias = Left$(CDBox.FileTitle, Len(CDBox.FileTitle) - 4)

'play midi
R% = mciSendString("OPEN " + CDBox.filename + " TYPE SEQUENCER ALIAS " + Alias, 0&, 0, 0)
R% = mciSendString("PLAY " + Alias + " FROM 0", 0&, 0, 0)
R% = mciSendString("CLOSE ANIMATION", 0&, 0, 0)

'play midi for 10 secs
t = Timer
Do: DoEvents: Loop Until Timer > t + PlayTime

'stop midi and close it
R% = mciSendString("OPEN " + CDBox.filename + " TYPE SEQUENCER ALIAS " + Alias, 0&, 0, 0)
R% = mciSendString&("STOP " + Alias, 0&, 0, 0)
R% = mciSendString&("CLOSE ANIMATION", 0&, 0, 0)
End Sub

[NoZ]

Hàm mciSendString gởi một lệnh dạng chuỗi tới một thiết bị MCI (Media Control Interface) như là CD, Loa, các thiết bị xem phim, nghe nhạc.

Khai báo của hàm này như sau:

Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Ý nghĩa của các tham số hình thức :

• lpszCommand: một chuỗi lệnh MCI ( nếu chuỗi gồm nhiều phần dùng dấu cộng (+) để nối)
• lpszReturnString: Địa chỉ của khối bộ nhớ dùng để nhận kết quả trả về. Nếu không cần kết quả này, bạn có thể truyền Null (0&) cho tham số.
• uReturnLength: Kích thước của khối bộ nhớ (tính bằng ký tự) được chỉ định bởi tham số lpszReturnString. Nếu tham số thứ hai là Null thì tham số này là 0.
• hwndCallback: Một số nguyên chỉ handle của một cửa sổ trả về. Thường là 0.

Ví dụ mở một file media để chuẩn bị chơi.
(Xem ví dụ đầy đủ của bạn infoc)
I = mciSendString(“OPEN ” + Text1.Text + “TYPE SEQUENCE ALIAS” + Text2.Text, 0&, 0, 0)
I là một biến Long, hay Interger.
Text1.Text để chứa đường dẫn đến file cần chơi.
Text2.Text để chứa một tên nào đó mình tự đặt cho file này để dể quản lý (Alias: bí danh)

Ví dụ chơi file từ đầu đến cuối (file phải được OPEN trước):

I = mciSendString(“PLAY” + Text2.Text + “FROM 0”, 0&, 0, 0)

Ngừng chơi: I = mciSendString(“CLOSE ANIMATION”, 0&, 0, 0)

Trị trả về:

Hàm trả về 0 nếu thành công và ngược lại sẽ trả về một lỗi. Lỗi trả về có kiểu doubleword. 4 byte thấp của lỗi chứa trị của lỗi. Nếu lỗi do khai báo thiết bị sai, bốn byte cao sẽ trả về một số chỉ trình điều khiển thiết bị gặp lỗi. Nếu không sẽ trả về 0.
bạn có thể tham khảo bảng hằng số lỗi trả về của MCI. (file đính kèm)

Để tìm hiểu kỹ hơn về lập trình MCI, bạn có thể truy cập MSDN với Index: MCI, MCI Command Strings, MCI Device Types, …

[NumPad0]

Có ai biết hàm mciSendString trong WinAi dùng làm gì không chi dùm tui với, các bạn có thể nêu cho tui biết rõ tham số của hàm ấy dùng làm gì được không và các tác dụng của hàm này , và nó dùng để làm gì, cám on nhiều.
-----------------------------------------------------------------
sao không chịu khó search trong bộ MSDN đi ! Đứng hỏi thế chứ ?

[whydontlove2003]

lol Nè bạn Xeko mỏ nhọn ui bạn có thể chỉ cho mình trang web để down cái phần >900 của API được không mình cần nó để tham khảo thêm đó mà.Cám ơn bạn trước nha

[dtt_vn]

http://www.allapi.net :D

[attilathehun]

cái >900 đó bao nhiêu mb hả anh?
có hay hơn trong MSDN ko?

[KEM_WALL]

hic, trùi ui, em là người thứ 3 định đi du lịch với NASA huh ?!?!
cái đó hơn 2Mb, chỉ nói về API thui, nó khá hơn Api text của MS vì cập nhật hơn và có examples, nhưng tiếc là ex của VB thui, kô phải .Net

[NoZ]

Phần mềm đó là API-Guide, hiện nay đã có phiên bản mới tại www.allapi.net. Dung lượng 3 MB. Phiên bản này đã có ví dụ cho .Net