Приветствую!
Пример, почти, из справки:
Код
#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()"
На работоспособность не влияет, но глаза мозолит. Можно это как-то исправить?