Colour pinstripe/Display: Difference between revisions
Content deleted Content added
| Line 898: | Line 898: | ||
cdKillCanvas(cdcanvas) |
cdKillCanvas(cdcanvas) |
||
return IUP_DEFAULT |
return IUP_DEFAULT |
||
end function |
|||
function esc_close(Ihandle /*ih*/, atom c) |
|||
if c=K_ESC then return IUP_CLOSE end if |
|||
return IUP_CONTINUE |
|||
end function |
end function |
||
| Line 936: | Line 931: | ||
IupSetAttributeHandle(dlg,"MENU",main_menu) |
IupSetAttributeHandle(dlg,"MENU",main_menu) |
||
IupSetCallback(canvas, "ACTION", Icallback("redraw_cb")) |
IupSetCallback(canvas, "ACTION", Icallback("redraw_cb")) |
||
IupCloseOnEscape(dlg) |
|||
IupSetCallback(dlg, "K_ANY", Icallback("esc_close")) |
|||
IupMap(dlg) |
IupMap(dlg) |
||
IupSetAttribute(canvas, "RASTERSIZE", NULL) -- release the minimum limitation |
IupSetAttribute(canvas, "RASTERSIZE", NULL) -- release the minimum limitation |
||