Добрый день, уважаемые форумчане.
Возможно глупый вопрос, но прошу меня простить. Я в программировании на freebasic относительно недавно и многого еще не понимаю.
Пытаюсь создать кнопку с битмапом из ресурсов. Причем через Load_image все работает. Следовательно изображение подходит но видимо что то у меня не так с чтением из ресурсов и подстановкой в кнопку.
Пробовал вот так:
Код
Var HIMAGE=LoadImageFromResource(Cast(LPCTSTR,200))
ButtonImageGadget(1,1,1,34,34,HIMAGE, BS_BITMAP)
И вот так:
Код
ButtonImageGadget(1,1,1,34,34,Cast(LPARAM,LoadImageFromResource(Cast(LPCTSTR,200))), BS_BITMAP)
Ничего не выходит.
Содержимое файла ресурсов:
Код
100 ICON "MyIcon.ico"
200 RT_BITMAP "2.bmp"
Иконка устанавливается на исполняемый файл.
Параметры компилятора: fbc -s gui res.rc
Ах да и еще компилятор предупреждение выдает вот это: warning 2(1): Passing pointer to scalar, at parameter 6 of BUTTONIMAGEGADGET()
Возможно в этом проблема.
Заранее благодарен.