alias test { if (!$dialog(test)) { dialog -m test test } }
dialog test {
title ""
size -1 -1 413 104
option dbu
box "", 1, 2 8 208 4
text "", 2, 3 1 151 9
list 3, 3 17 240 84, size
button "Clear", 4, 373 74 37 12
button "Close", 5, 373 89 37 12, ok
}
on *:dialog:test:init:*: {
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetFont test 2 +b 17 400 Tahoma
mdx SetBorderStyle $dname 4,5 staticedge
mdx SetControlMDX $dname 3 Listview rowselect nosortheader grid single flatsb labeltip headerdrag report sortdescending > $views
did -i $dname 3 1 headerdims 90 90 295
did -i $dname 3 1 headertext +c Time $chr(9) $+ +c Nick $chr(9) $+ +c Message
did -a $dname 3 $time(hh:mm tt) $chr(9) test $chr(9) This is a test with a long line, lets se what happens when it's long like this?
}
alias -l mdx { dll $+(",$scriptdir,mdx.dll,") $1- }
alias -l views { return $+($mircdir,views.mdx) }