FreeBasic
Главная
Вход
Регистрация
Суббота, 21.12.2024, 18:54Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
mciSendString
ExEДата: Пятница, 27.05.2016, 19:29 | Сообщение # 1
Сержант
Группа: Пользователи
Сообщений: 21
Репутация: 0
Статус: Offline
Если кратко, загружаю пример проигрывающий миди:

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

 mciSendString("OPEN aircaves.mid TYPE SEQUENCER ALIAS myMIDI","",0,0)
 mciSendString("PLAY myMIDI wait","",0,0)
 mciSendString("CLOSE myMIDI","",0,0)

выдает гору ошибок:

C:\Users\Игорь\Desktop\Моя Папка\Программирование\freebasic\Compilier\fbc -s console "FbTemp.bas"
FbTemp.o:fake:(.text+0x81): undefined reference to `mciSendStringA@32'
FbTemp.o:fake:(.text+0xf6): undefined reference to `mciSendStringA@32'
FbTemp.o:fake:(.text+0x16b): undefined reference to `mciSendStringA@32'

Как я понимаю, что то там, в библиотеке, не объявлено. Это можно исправить?
 
haavДата: Пятница, 27.05.2016, 21:16 | Сообщение # 2
Генералиссимус
Группа: Администраторы
Сообщений: 1373
Репутация: 50
Статус: Offline
Не помню с какой версии компилятора, но теперь тип string для декларации winapi функций нельзя использовать. Замени на Zstring ptr.

Вы сохраняете власть над людьми покуда оставляете им что-то…Отберите у человека все, и этот человек уже будет неподвластен вам…
 
  • Страница 1 из 1
  • 1
Поиск: