Hope this helps. ($W is the window)
$W->AddButton(
-name => "Radiogroup1",
-left => 96,
-top => 105,
-width => 176,
-height => 75,
-text => "Quote Access Method",
-style => WS_VISIBLE | WS_CHILD | $BS_GROUPBOX,
);
$W->AddRadioButton(
-name => "optWeb",
-text => ("Web", 2),
-height => 24,
-left => 108,
-top => 125,
-width => 90,
);
$W->AddRadioButton(
-name => "optDB",
-text => ("Database", 2),
-height => 24,
-left => 108,
-top => 145,
-width => 90,
);
To query a radio button:
if ($W->optWeb->Checked()) {
$accesstype = "web";
}
To set initial state of a radio button:
$W->optWeb->Checked(1);
Barry
> -----Original Message-----
> From: Tim Haakenson [SMTP:[EMAIL PROTECTED]]
> Sent: Tuesday, May 04, 1999 12:00 PM
> To: [EMAIL PROTECTED]
> Subject: [perl-win32-gui] Radio buttons etc.
>
> I am having some problems, and would appreciate any help.
>
> 1) Is there any way to query the state of a radio button?
>
> 2) Is there any way to set the initial state of a radio button?
>
> 3) Is there anyway to initially set the selection the drop down portion
> of a combo box?
>
> 4) What is a zero-based index?
>
>
> Thanks,
> Tim Haakenson
