BorlandTalk.com

Allan Hansen · Guest

I'm using D7.1 with IW 5.1.30 and tms 1.6-ish.

I cannot make the TTIWRadioButton work. Do the following to see the problem:

1. Create a new Intraweb stand-alone application
2. On the form, drop two TTIWRadioButtons, a regular TIWButton and a
TIWLabel
3. Connect TIWRadioButton2.MasterButton to TIWRadioButton1
4. Insert the following code in the TIWButton's OnClick handler:

procedure TIWForm1.IWButton1Click(Sender: TObject);
begin
if TIWRadioButton1.Checked then
IWLabel1.Caption:='Test1'
else if TIWRadioButton2.Checked then
IWLabel1.Caption:='Test2'
else
IWLabel1.Caption:='ERROR';
end;

5. Run the app.
6. Select one of the radio buttons and click the button.

Now, I would expect it to print either "Test1" or "Test2" depending on which
button is selected, but that is not what happens. It prints "ERROR".

The .Checked property is not being set. Am I doing anything wrong here or is
the TTIWRadioButton buggy?

Kind regards

Allan