Source position: radiogroup.pas line 12
type TOnCheckedChanged = procedure(
Sender: TObject;
checkedIndex: Integer;
checkedCaption: string
) of object;