>
|
with(Maplets[Elements]):
maplet := Maplet([
[RadioButton['RB1']("1", 'value'=true, 'group'='BG1'),
RadioButton['RB2']("2", 'value'=false, 'group'='BG1')],
[RadioButton['RB3']("1", 'value'=true, 'group'='BG2'),
RadioButton['RB4']("2", 'value'=false, 'group'='BG2')],
[Button("OK", Shutdown(['RB1', 'RB2', 'RB3', 'RB4'])),
Button("Cancel", Shutdown())]
], ButtonGroup['BG1'](), ButtonGroup['BG2']()):
Maplets[Display](maplet);
|