Tạo hiệu ứng âm thanh trong turbo pascal

giup minh cach tao am thanh trong pascal voi minh dang can gap
 
Thủ tục: Sound(<Độ cao âm thanh>);
Phát âm thanh có độ cao cho trước liên tục (nhớ là liên tục nha)
Thủ tục: NoSound;
Tắt âm thanh đang phát bởi thủ tục trên
Hai thủ tục trên và thêm delay nữa là ok
Sound(500);
delay(1000);
nosound;
Phát âm thanh có độ cao 500 kéo dài 1 giây
 

Thống kê

Chủ đề
100,657
Bài viết
467,424
Thành viên
339,832
Thành viên mới nhất
tiendungmobi
Top