TRadioButton and TRadioGroup Click Bug
Original Reporter info from Mantis: taka_jp
-
Reporter name: removed
Original Reporter info from Mantis: taka_jp
- Reporter name: removed
Description:
[TRadioButton] Win32 and Debian(X86_64)
- RadioButton1 Click
-> RadioButton1.OnClick
- RadioButton2 Click
-> RadioButton1.OnClick <-- bug
-> RadioButton2.OnClick
- RadioButton3 Click
-> RadioButton2.OnClick <-- bug
-> RadioButton3.OnClick
[TRadioGroup] Win32
When I click the item with the checkmark focus,
Two times of OnClick events are called
Click : OnClick(ItemIndex= -1) --> OnClick(ItemIndex=Clicked Index)
--------------------------
attach Sample zip File
project1.lpi lazarus
project2.dpr Delphi
Additional information:
Perhaps it is caused by an event below
procedure TCustomCheckBox.DoChange(var Msg);
inherited Click; // emulate delphi OnClick behaviour
end;
lcl/include/customcheckbox.inc
+ if (Self is TRadioButton)and(FState <> cbChecked) then Exit;
inherited Click; // emulate delphi OnClick behaviour
Mantis conversion info:
- Mantis ID: 14989
- Version: 0.9.29 (SVN)
- Fixed in version: 0.9.29 (SVN)
- Fixed in revision: 26761 (#d5c10dfa)
- Monitored by: » LesKaye (Leslie Kaye)
- Target version: 1.0.0
- LazTarget: 1.0