Sophie
program colsel; uses xforms; begin fl_initialize(@argc, argv, 'FormDemo', nil, 0); fl_show_colormap(0); end.