[perl-win32-gui-users] Checkbox properties

[Joel Oliveira]

Hello all,
It's possible to make something like this (to get a checked box):
$WD->AddCheckbox(-text=>'&Company',-name=>'Company',-left=>8,-top=>18,
-width=>68,-height=>15,-Checked=>1);

I'm trying to avoid:
$WD->AddCheckbox(-text=>'&Company',-name=>'Company',-left=>8,-top=>18,
-width=>68,-height=>15,-Checked=>1);
$WD->Company->Checked(1);

Thanks,

        Joel Oliveira

--------------------------------------------