rendered paste body;File View
alias filelist {
if !$dialog(filelist) { dialog -md filelist filelist_table }
dialog -v filelist
}
dialog filelist_table {
title "File List"
size 260 50 509 323
}
on *:dialog:filelist:*:*: {
if $devent = init {
;mark and make dialog
dcx Mark $dname filelist_cb
xdialog -b $dname +tzsoy
;make control: (Toolbar 3)
xdialog -c $dname 3 toolbar 0 0 511 28 flat top list tooltips arrows tabstop
xdid -l $dname 3 16
xdid -m $dname 3 0
xdid -j $dname 3 24 24
xdid -a $dname 3 0 + 0 1 0 Button $chr(9) Button
;set resting icons
xdid -w $dname 3 +n 1 $loc(shell).dll
;set hottrack icons
xdid -w $dname 3 +h 2 $loc(shell).dll
;make control: (Panel 1)
xdialog -c $dname 1 panel 0 30 500 250
;// Initialising control: (Panel 5)
xdid -c $dname 1 5 panel 0 1 498 35
;// Initialising control: (ComboEx 7)
xdid -c $dname 5 7 comboex 280 4 150 300 dropdown tabstop
;// Initialising control: Filter (Check 8)
xdid -c $dname 5 8 check 440 3 50 24 tabstop pushlike
xdid -t $dname 8 Filter
;// Initialising control: (ComboEx 6)
xdid -c $dname 5 6 comboex 3 4 275 300 dropdown tabstop
;make control: (ListView 4)
xdid -c $dname 1 4 listview 0 40 498 200 report fullrow showsel nolabelwrap tooltip tabstop
;make control: (Statusbar 2)
xdialog -c $dname 2 statusbar 0 299 499 20 grip tooltips
;dialog root CLA pane
xdialog -l $dname root $chr(9) +pv 0 1 0 0
;toolbar CLA fixed cell
xdialog -l $dname cell root $chr(9) +fvi 3 0 0 0
;Panel 1 CLA fill cell
xdialog -l $dname cell root $chr(9) +lvi 1 1 0 0
;Panel 1 CLA PANE 1
xdialog -l $dname cell root $chr(9) +pvi 1 1 0 0
;PANE 1 Children
;Panel 5 fixed cell
xdialog -l $dname cell 1 $chr(9) +fvi 5 0 0 0
;ListView filled cell
xdialog -l $dname cell 1 $chr(9) +lvi 4 1 0 0
;statusbar CLA fixed cell
xdialog -l $dname cell root $chr(9) +fvi 2 0 0 0
;init CLA layout
.timer 1 0 xdialog -l $dname update
}
}