15.05.2013, 02:30
|
|
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
Первый вариант компилятор полностью устроил, не вякает больше.
Осталось устранить последнюю ошибку.
Код:
extern void WINAPI proc_close(void *user);
extern unsigned long long WINAPI proc_length(void *user);
extern unsigned long WINAPI proc_read(void *buffer, unsigned long length, void *user);
extern bool WINAPI proc_seek(unsigned long long offset, void *user);
...
BASSProcs.close = proc_close;
BASSProcs.length = proc_length;
BASSProcs.read = proc_read;
BASSProcs.seek = proc_seek; // Здесь кака
Цитата:
Cannot convert 'bool (__stdcall *)(unsigned __int64,void *)' to 'int (__stdcall *)(unsigned __int64,void *)' in function CMyClass::LoadSound(const char *)
|
Хотя по-описанию
Код:
// User file stream callback functions
typedef void (CALLBACK FILECLOSEPROC)(void *user);
typedef QWORD (CALLBACK FILELENPROC)(void *user);
typedef DWORD (CALLBACK FILEREADPROC)(void *buffer, DWORD length, void *user);
typedef BOOL (CALLBACK FILESEEKPROC)(QWORD offset, void *user);
typedef struct {
FILECLOSEPROC *close;
FILELENPROC *length;
FILEREADPROC *read;
FILESEEKPROC *seek;
} BASS_FILEPROCS;
она возвращает bool
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
|