static int Colorbar(lua_State *L)
{
Ihandle *ih = IupColorbar();
iuplua_plugstate(L, ih);
iuplua_pushihandle_raw(L, ih);
return 1;
}
VALUE rb_IupColorbar(VALUE self)
{
extern VALUE rb_cIupColorbar;
Ihandle* v;
IupControlsOpen();
v = IupColorbar();
if(v)
return rb_funcall(rb_cIupColorbar,rb_intern("new"),1,ULONG2NUM((unsigned long)v));
return Qnil;
}
/* Main program */
int main(int argc, char **argv)
{
Ihandle *dlg, *cb;
/* Initializes IUP */
IupOpen(&argc, &argv);
IupControlsOpen();
/* Creates a canvas associated with the redraw action */
cnvs = IupCanvas(NULL);
IupSetCallback(cnvs, "ACTION", (Icallback)redraw_cb);
/* Sets size, minimum and maximum values, position and size of the thumb */
/* of the horizontal scrollbar of the canvas */
IupSetAttributes(cnvs, "RASTERSIZE=200x300");
cb = IupColorbar();
IupSetAttribute(cb, "RASTERSIZE", "70x");
IupSetAttribute(cb, "EXPAND", "VERTICAL");
IupSetAttribute(cb, "NUM_PARTS", "2");
IupSetAttribute(cb, "SHOW_SECONDARY", "YES");
IupSetCallback(cb, "SELECT_CB", (Icallback)select_cb);
IupSetCallback(cb, "CELL_CB", (Icallback)cell_cb);
IupSetCallback(cb, "SWITCH_CB", (Icallback)switch_cb);
// IupSetAttribute(cb, "SQUARED", "NO");
IupSetAttribute(cb, "PREVIEW_SIZE", "60");
/* Creates a dialog with a vbox containing the canvas and the colorbar. */
dlg = IupDialog(IupHbox(cnvs, cb, NULL));
/* Sets the dialog's title, so that it is mapped properly */
IupSetAttribute(dlg, "TITLE", "IupColorbar");
/* Maps the dialog. This must be done before the creation of the CD canvas */
IupMap(dlg);
/* Creates a CD canvas of type CD_IUP */
cdcanvas = cdCreateCanvas(CD_IUP, cnvs);
/* Shows dialog on the center of the screen */
IupShow(dlg);
/* Initializes IUP main loop */
IupMainLoop();
/* Finishes IUP */
IupClose();
/* Program finished successfully */
return EXIT_SUCCESS;
}
void ColorbarTest(void)
{
Ihandle *dlg, *cb;
IupControlsOpen();
/* Creates a canvas associated with the redraw action */
canvas = IupCanvas(NULL) ;
IupSetCallback(canvas, "ACTION", (Icallback)redraw_cb);
IupSetAttribute(canvas, "RASTERSIZE", "200x300");
cb = IupColorbar();
IupSetAttribute(cb, "RASTERSIZE", "70x");
IupSetAttribute(cb, "EXPAND", "VERTICAL");
IupSetAttribute(cb, "NUM_PARTS", "2");
IupSetAttribute(cb, "SHOW_SECONDARY", "YES");
IupSetAttribute(cb, "PREVIEW_SIZE", "60");
// IupSetAttribute(cb, "ACTIVE", "NO");
// IupSetAttribute(cb, "BGCOLOR", "128 0 255");
IupSetCallback(cb, "SELECT_CB", (Icallback)select_cb);
IupSetCallback(cb, "CELL_CB", (Icallback)cell_cb);
IupSetCallback(cb, "SWITCH_CB", (Icallback)switch_cb);
IupSetCallback(cb, "EXTENDED_CB", (Icallback)extended_cb);
dlg = IupDialog(IupHbox(canvas, cb, NULL));
IupSetAttribute(dlg, "MARGIN", "5x5");
IupSetAttribute(dlg, "TITLE", "IupColorbar");
/* Maps the dlg. This must be done before the creation of the CD canvas.
Could also use MAP_CB callback. */
IupMap(dlg);
cdcanvas = cdCreateCanvas(CD_IUP, canvas);
IupPopup(dlg, IUP_CENTER, IUP_CENTER);
cdKillCanvas(cdcanvas);
}
static int iColorDlgCreateMethod(Ihandle* ih, void** params)
{
Ihandle *ok_bt, *cancel_bt;
Ihandle *rgb_vb, *hsi_vb, *clr_vb;
Ihandle *lin1, *lin2, *col1, *col2;
IcolorDlgData* colordlg_data = (IcolorDlgData*)malloc(sizeof(IcolorDlgData));
memset(colordlg_data, 0, sizeof(IcolorDlgData));
iupAttribSet(ih, "_IUP_GC_DATA", (char*)colordlg_data);
/* ======================================================================= */
/* BUTTONS ============================================================= */
/* ======================================================================= */
ok_bt = IupButton("_@IUP_OK", NULL); /* Ok Button */
IupSetStrAttribute(ok_bt, "PADDING", IupGetGlobal("DEFAULTBUTTONPADDING"));
IupSetCallback (ok_bt, "ACTION", (Icallback)iColorDlgButtonOK_CB);
IupSetAttributeHandle(ih, "DEFAULTENTER", ok_bt);
cancel_bt = IupButton("_@IUP_CANCEL", NULL); /* Cancel Button */
IupSetStrAttribute(cancel_bt, "PADDING", IupGetGlobal("DEFAULTBUTTONPADDING"));
IupSetCallback (cancel_bt, "ACTION", (Icallback)iColorDlgButtonCancel_CB);
IupSetAttributeHandle(ih, "DEFAULTESC", cancel_bt);
colordlg_data->help_bt = IupButton("_@IUP_HELP", NULL); /* Help Button */
IupSetStrAttribute(colordlg_data->help_bt, "PADDING", IupGetGlobal("DEFAULTBUTTONPADDING"));
IupSetCallback (colordlg_data->help_bt, "ACTION", (Icallback)iColorDlgButtonHelp_CB);
/* ======================================================================= */
/* COLOR =============================================================== */
/* ======================================================================= */
colordlg_data->color_browser = IupColorBrowser();
IupSetAttribute(colordlg_data->color_browser, "EXPAND", "YES");
IupSetCallback(colordlg_data->color_browser, "DRAG_CB", (Icallback)iColorDlgColorSelDrag_CB);
IupSetCallback(colordlg_data->color_browser, "CHANGE_CB", (Icallback)iColorDlgColorSelDrag_CB);
IupSetAttribute(colordlg_data->color_browser, "MINSIZE", "200x200");
colordlg_data->color_cnv = IupCanvas(NULL); /* Canvas of the color */
IupSetAttribute(colordlg_data->color_cnv, "SIZE", "x12");
IupSetAttribute(colordlg_data->color_cnv, "CANFOCUS", "NO");
IupSetAttribute(colordlg_data->color_cnv, "EXPAND", "HORIZONTAL");
IupSetCallback (colordlg_data->color_cnv, "ACTION", (Icallback)iColorDlgColorCnvAction_CB);
IupSetCallback (colordlg_data->color_cnv, "BUTTON_CB", (Icallback)iColorDlgColorCnvButton_CB);
colordlg_data->colorhex_txt = IupText(NULL); /* Hex of the color */
IupSetAttribute(colordlg_data->colorhex_txt, "VISIBLECOLUMNS", "7");
IupSetCallback (colordlg_data->colorhex_txt, "ACTION", (Icallback)iColorDlgHexAction_CB);
IupSetAttribute(colordlg_data->colorhex_txt, "MASK", "#[0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F]");
/* ======================================================================= */
/* ALPHA TRANSPARENCY ================================================== */
/* ======================================================================= */
colordlg_data->alpha_val = IupVal("HORIZONTAL");
IupSetAttribute(colordlg_data->alpha_val, "EXPAND", "HORIZONTAL");
IupSetAttribute(colordlg_data->alpha_val, "MIN", "0");
IupSetAttribute(colordlg_data->alpha_val, "MAX", "255");
IupSetAttribute(colordlg_data->alpha_val, "VALUE", "255");
IupSetAttribute(colordlg_data->alpha_val, "SIZE", "80x12");
IupSetCallback (colordlg_data->alpha_val, "MOUSEMOVE_CB", (Icallback)iColorDlgAlphaVal_CB);
IupSetCallback (colordlg_data->alpha_val, "BUTTON_PRESS_CB", (Icallback)iColorDlgAlphaVal_CB);
IupSetCallback (colordlg_data->alpha_val, "BUTTON_RELEASE_CB", (Icallback)iColorDlgAlphaVal_CB);
colordlg_data->alpha_txt = IupText(NULL); /* Alpha value */
IupSetAttribute(colordlg_data->alpha_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->alpha_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->alpha_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->alpha_txt, "SPINMAX", "255");
IupSetAttribute(colordlg_data->alpha_txt, "SPININC", "1");
IupSetCallback (colordlg_data->alpha_txt, "ACTION", (Icallback)iColorDlgAlphaAction_CB);
IupSetCallback (colordlg_data->alpha_txt, "SPIN_CB", (Icallback)iColorDlgAlphaSpin_CB);
IupSetAttribute(colordlg_data->alpha_txt, "MASKINT", "0:255");
/* ======================================================================= */
/* COLOR TABLE ========================================================= */
/* ======================================================================= */
colordlg_data->colortable_cbar = IupColorbar();
IupSetAttribute(colordlg_data->colortable_cbar, "ORIENTATION", "HORIZONTAL");
IupSetAttribute(colordlg_data->colortable_cbar, "NUM_PARTS", "2");
IupSetInt(colordlg_data->colortable_cbar, "NUM_CELLS", COLORTABLE_MAX);
IupSetAttribute(colordlg_data->colortable_cbar, "SHOW_PREVIEW", "NO");
IupSetAttribute(colordlg_data->colortable_cbar, "SIZE", "138x22");
IupSetAttribute(colordlg_data->colortable_cbar, "SQUARED", "NO");
IupSetCallback (colordlg_data->colortable_cbar, "SELECT_CB", (Icallback)iColorDlgColorTableSelect_CB);
/* ======================================================================= */
/* RGB TEXT FIELDS ===================================================== */
/* ======================================================================= */
colordlg_data->red_txt = IupText(NULL); /* Red value */
IupSetAttribute(colordlg_data->red_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->red_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->red_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->red_txt, "SPINMAX", "255");
IupSetAttribute(colordlg_data->red_txt, "SPININC", "1");
IupSetCallback (colordlg_data->red_txt, "ACTION", (Icallback)iColorDlgRedAction_CB);
IupSetCallback (colordlg_data->red_txt, "SPIN_CB", (Icallback)iColorDlgRedSpin_CB);
IupSetAttribute(colordlg_data->red_txt, "MASKINT", "0:255");
colordlg_data->green_txt = IupText(NULL); /* Green value */
IupSetAttribute(colordlg_data->green_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->green_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->green_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->green_txt, "SPINMAX", "255");
IupSetAttribute(colordlg_data->green_txt, "SPININC", "1");
IupSetCallback (colordlg_data->green_txt, "ACTION", (Icallback)iColorDlgGreenAction_CB);
IupSetCallback (colordlg_data->green_txt, "SPIN_CB", (Icallback)iColorDlgGreenSpin_CB);
IupSetAttribute(colordlg_data->green_txt, "MASKINT", "0:255");
colordlg_data->blue_txt = IupText(NULL); /* Blue value */
IupSetAttribute(colordlg_data->blue_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->blue_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->blue_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->blue_txt, "SPINMAX", "255");
IupSetAttribute(colordlg_data->blue_txt, "SPININC", "1");
IupSetCallback (colordlg_data->blue_txt, "ACTION", (Icallback)iColorDlgBlueAction_CB);
IupSetCallback (colordlg_data->blue_txt, "SPIN_CB", (Icallback)iColorDlgBlueSpin_CB);
IupSetAttribute(colordlg_data->blue_txt, "MASKINT", "0:255");
/* ======================================================================= */
/* HSI TEXT FIELDS ===================================================== */
/* ======================================================================= */
colordlg_data->hue_txt = IupText(NULL); /* Hue value */
IupSetAttribute(colordlg_data->hue_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->hue_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->hue_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->hue_txt, "SPINMAX", "359");
IupSetAttribute(colordlg_data->hue_txt, "SPINWRAP", "YES");
IupSetAttribute(colordlg_data->hue_txt, "SPININC", "1");
IupSetCallback(colordlg_data->hue_txt, "ACTION", (Icallback)iColorDlgHueAction_CB);
IupSetCallback(colordlg_data->hue_txt, "SPIN_CB", (Icallback)iColorDlgHueSpin_CB);
IupSetAttribute(colordlg_data->hue_txt, "MASKINT", "0:359");
colordlg_data->saturation_txt = IupText(NULL); /* Saturation value */
IupSetAttribute(colordlg_data->saturation_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->saturation_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->saturation_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->saturation_txt, "SPINMAX", "100");
IupSetAttribute(colordlg_data->saturation_txt, "SPININC", "1");
IupSetCallback(colordlg_data->saturation_txt, "ACTION", (Icallback)iColorDlgSaturationAction_CB);
IupSetCallback(colordlg_data->saturation_txt, "SPIN_CB", (Icallback)iColorDlgSaturationSpin_CB);
IupSetAttribute(colordlg_data->saturation_txt, "MASKINT", "0:100");
colordlg_data->intensity_txt = IupText(NULL); /* Intensity value */
IupSetAttribute(colordlg_data->intensity_txt, "VISIBLECOLUMNS", "3");
IupSetAttribute(colordlg_data->intensity_txt, "SPIN", "YES");
IupSetAttribute(colordlg_data->intensity_txt, "SPINMIN", "0");
IupSetAttribute(colordlg_data->intensity_txt, "SPINMAX", "100");
IupSetAttribute(colordlg_data->intensity_txt, "SPININC", "1");
IupSetCallback(colordlg_data->intensity_txt, "ACTION", (Icallback)iColorDlgIntensityAction_CB);
IupSetCallback(colordlg_data->intensity_txt, "SPIN_CB", (Icallback)iColorDlgIntensitySpin_CB);
IupSetAttribute(colordlg_data->intensity_txt, "MASKINT", "0:100");
/* =================== */
/* 1st line = Controls */
/* =================== */
col1 = IupVbox(colordlg_data->color_browser, IupSetAttributes(IupHbox(colordlg_data->color_cnv, NULL), "MARGIN=30x0"),NULL);
hsi_vb = IupVbox(IupSetAttributes(IupHbox(IupLabel("_@IUP_HUE"),
colordlg_data->hue_txt,
NULL), "ALIGNMENT=ACENTER"),
IupSetAttributes(IupHbox(IupLabel("_@IUP_SATURATION"),
colordlg_data->saturation_txt,
NULL), "ALIGNMENT=ACENTER"),
IupSetAttributes(IupHbox(IupLabel("_@IUP_INTENSITY"),
colordlg_data->intensity_txt,
NULL), "ALIGNMENT=ACENTER"),
NULL);
IupSetAttribute(hsi_vb, "GAP", "5");
rgb_vb = IupVbox(IupSetAttributes(IupHbox(IupLabel("_@IUP_RED"),
colordlg_data->red_txt,
NULL), "ALIGNMENT=ACENTER"),
IupSetAttributes(IupHbox(IupLabel("_@IUP_GREEN"),
colordlg_data->green_txt,
NULL), "ALIGNMENT=ACENTER"),
IupSetAttributes(IupHbox(IupLabel("_@IUP_BLUE"),
colordlg_data->blue_txt,
NULL), "ALIGNMENT=ACENTER"),
NULL);
IupSetAttribute(rgb_vb, "GAP", "5");
clr_vb = IupVbox(IupSetAttributes(IupHbox(IupLabel("_@IUP_OPACITY"),
colordlg_data->alpha_txt, colordlg_data->alpha_val,
NULL), "ALIGNMENT=ACENTER"),
IupSetAttributes(IupHbox(IupLabel("He&xa:"),
colordlg_data->colorhex_txt,
NULL), "ALIGNMENT=ACENTER"),
IupSetAttributes(IupVbox(IupLabel("_@IUP_PALETTE"),
colordlg_data->colortable_cbar,
NULL), "GAP=3"),
NULL);
IupSetAttribute(clr_vb, "GAP", "5");
IupSetAttribute(clr_vb, "EXPAND", "YES");
IupDestroy(IupSetAttributes(IupNormalizer(IupGetChild(IupGetChild(hsi_vb, 0), 0), /* Hue Label */
IupGetChild(IupGetChild(hsi_vb, 1), 0), /* Saturation Label */
IupGetChild(IupGetChild(hsi_vb, 2), 0), /* Intensity Label */
IupGetChild(IupGetChild(clr_vb, 0), 0), /* Opacity Label */
IupGetChild(IupGetChild(clr_vb, 1), 0), /* Hexa Label */
NULL), "NORMALIZE=HORIZONTAL"));
IupDestroy(IupSetAttributes(IupNormalizer(IupGetChild(IupGetChild(rgb_vb, 0), 0), /* Red Label */
IupGetChild(IupGetChild(rgb_vb, 1), 0), /* Green Label */
IupGetChild(IupGetChild(rgb_vb, 2), 0), /* Blue Label */
NULL), "NORMALIZE=HORIZONTAL"));
col2 = IupVbox(IupSetAttributes(IupHbox(hsi_vb, IupFill(), rgb_vb, NULL), "EXPAND=YES"),
IupSetAttributes(IupLabel(NULL), "SEPARATOR=HORIZONTAL"),
clr_vb,
NULL);
IupSetAttributes(col2, "EXPAND=NO, GAP=10");
lin1 = IupHbox(col1, col2, NULL);
IupSetAttribute(lin1, "GAP", "10");
IupSetAttribute(lin1, "MARGIN", "0x0");
/* ================== */
/* 2nd line = Buttons */
/* ================== */
lin2 = IupHbox(IupFill(), ok_bt, cancel_bt, colordlg_data->help_bt, NULL);
IupSetAttribute(lin2, "GAP", "5");
IupSetAttribute(lin2, "MARGIN", "0x0");
IupSetAttribute(lin2, "NORMALIZESIZE", "HORIZONTAL");
/* Do not use IupAppend because we set childtype=IUP_CHILDNONE */
iupChildTreeAppend(ih, IupSetAttributes(IupVbox(lin1, IupSetAttributes(IupLabel(NULL), "SEPARATOR=HORIZONTAL"), lin2, NULL), "MARGIN=10x10, GAP=10"));
IupRefresh(ih);
if (colordlg_data->color_browser->currentwidth < colordlg_data->color_browser->currentheight)
{
IupSetStrf(colordlg_data->color_browser, "RASTERSIZE", "%dx", colordlg_data->color_browser->currentheight);
IupSetAttribute(ih, "RASTERSIZE", NULL);
}
IupSetAttribute(ih, "RESIZE", "NO");
iColorDlgInit_Defaults(colordlg_data);
(void)params;
return IUP_NOERROR;
}
