alias tabtest {
dialog -amr tabtest tabtest
}
alias tabswitch {
did -fu tabtest $1
}
dialog tabtest {
title "Tabtest"
option dbu
size -1 -1 150 130
tab "tab1", 1, 5 5 140 100
tab "tab2", 2
tab "tab3", 3
button "Close", 40, 30 110 40 13, ok
button "tab1", 10, 20 30 40 13, tab 1
button "tab2", 20, 20 30 40 13, tab 2
button "tab3", 30, 20 30 40 13, tab 3
}
on *:DIALOG:tabtest:init:0: {
; should switch to tab 2
tabswitch 2
}