FreeBasic
Главная
Вход
Регистрация
Суббота, 23.09.2017, 10:31Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Форум » Библиотеки для FreeBasic » Библиотека Window9 для Freebasic » Варнинги при загрузке картинок в кнопки
Варнинги при загрузке картинок в кнопки
Billi_JoДата: Четверг, 19.01.2017, 14:42 | Сообщение # 1
Сержант
Группа: Пользователи
Сообщений: 37
Репутация: 0
Статус: Offline
Приветствую!

Пример, почти, из справки:

Код
#Include "window9.bi"

dim as HWND      hwnd
Dim As integer event
hwnd=OpenWindow("1",300,10,100,200)
Var HIMAGE=Load_image("C:\WINDOWS\system32\oobe\images\merlin.gif")
ButtonImageGadget(1,10,10,80,80,HIMAGE)

Do
    event=WaitEvent()
    If event=EventClose Then End
Loop


Вызывает предупреждения: "warning 2(1): Passing pointer to scalar, at parameter 6 of BUTTONIMAGEGADGET()"

На работоспособность не влияет, но глаза мозолит. Можно это как-то исправить?
 
haavДата: Четверг, 19.01.2017, 16:13 | Сообщение # 2
Генерал-лейтенант
Группа: Администраторы
Сообщений: 768
Репутация: 33
Статус: Offline
ButtonImageGadget(1,10,10,80,80,CInt(HIMAGE))

Вы сохраняете власть над людьми покуда оставляете им что-то…Отберите у человека все, и этот человек уже будет неподвластен вам…
 
Billi_JoДата: Пятница, 20.01.2017, 16:00 | Сообщение # 3
Сержант
Группа: Пользователи
Сообщений: 37
Репутация: 0
Статус: Offline
Предупреждения исчезли, спасибо!
Надеюсь в следующей ревизии библиотеки этот баг будет пофиксен)
 
Форум » Библиотеки для FreeBasic » Библиотека Window9 для Freebasic » Варнинги при загрузке картинок в кнопки
Страница 1 из 11
Поиск: