Hi everyone,
The code below when run with IDL 8.0 produces a widget table that
shows all its columns with Windows XP, but only one with Solaris.
Any thoughts for how to make it better?
James Drake
The Aerospace Corporation
PRO examp, GROUP = GROUP
base = WIDGET_BASE(TITLE = '', /ROW, XSIZE = 1000)
base1 = WIDGET_BASE(base)
; Make longstring wide enough for the widest row label.
longstring = Strarr(1600) +
'VCM_AERO_ASH_M15M16BTDIFF_MIDLAT_MAX_THRESH_3'
table = WIDGET_TABLE(base1, Y_Scroll_Size=10, XSize=4, $
Row_Labels=longstring, Value=Strarr(4,1600), $
Column_Labels=['default','minimum', 'maximum','value'], $
UValue='table', Column_Width=[1,1,1,1], Units=1, $
Editable=[Intarr(3,1600),Transpose(1+Intarr(1600))], $
Background=[[250,250,200], [250,250,200], [250,250,200], [255, 255,
255]] )
WIDGET_CONTROL, base
; Realize the widgets:
WIDGET_CONTROL, base1, /REALIZE
WIDGET_CONTROL, table, use_table_select=[-1,0,3,1599], $
column_width=[4,1,1,1,1],units=1
END
|