* Make a generic navigation button */
| 386 | * Make a generic navigation button |
| 387 | */ |
| 388 | CustButton *UI::make_button(const char *label, Fl_Image *img, Fl_Image *deimg, |
| 389 | int b_n, int start) |
| 390 | { |
| 391 | if (start) |
| 392 | p_xpos = 0; |
| 393 | |
| 394 | CustButton *b = new CustButton(p_xpos, 0, bw, bh, (lbl) ? label : NULL); |
| 395 | if (img) |
| 396 | b->image(img); |
| 397 | if (deimg) |
| 398 | b->deimage(deimg); |
| 399 | b->callback(b1_cb, INT2VOIDP(b_n)); |
| 400 | b->clear_visible_focus(); |
| 401 | b->labelsize(12); |
| 402 | b->box(FL_FLAT_BOX); |
| 403 | b->down_box(FL_THIN_DOWN_FRAME); |
| 404 | p_xpos += bw; |
| 405 | return b; |
| 406 | } |
| 407 | |
| 408 | /** |
| 409 | * Create the archetipic browser buttons |