dialog new_table {
title "Conectar al SerVer"
size -1 -1 305 127
option dbu
text "VerDuGo Team 2003", 6, 7 95 206 8, disable nowrap
button "Aceptar", 7, 252 106 37 12, flat ok
tab "Conexion", 3, 2 7 297 114
text "SerVer:", 2, 9 35 32 8, tab 3
edit %server, 4, 39 34 194 10, tab 3 | set %server
box "Conexion Server", 1, 4 23 293 83, tab 3
button "Conectar......", 10, 235 33 37 12, tab 3
tab "Ident & Mail", 5
text "Nombre ", 11, 7 27 25 8, tab 5
text "Mail", 12, 7 40 25 8, tab 5
edit %nombre, 13, 38 26 220 10, tab 5 | set %nombre
edit %mail, 14, 38 38 200 10, tab 5 | set %mail
text "IDENT:", 15, 7 56 25 8, tab 5
edit "", 16, 39 55 80 9, tab 5
tab "Nick Alternativos ", 8
text "Nick Alternativo", 17, 6 32 25 8, tab 8
edit "", 18, 43 31 197 10, tab 8
tab "Tab 4", 9
}
on 1:dialog:new_table:sclick:10: goto L1
:L1
.server %server
