Doubt to "check" a radiobutton by clicking on an image

Question

I have these 3 images with 3 RadioButtons different, I would like to click on the image of the blank square for example, the respective RadioButton be selected.

I used radiobutton3.checked at the event OnClick image but did not work.

In the image is three rectangles painted differently, with RadioButtons next to each. None of them is marked as selected.

Answer 1

To do this is enough to add the following code in the event onclick of imagem3, and the Radiobutton will pass to check in:

procedure TForm1.Image3Click(Sender: TObject);
begin
  radiobutton3.Checked := True;
end;

Another thing that can be done is pass the others Radiobuttons to false, simply adding the following code:

procedure TForm1.Image3Click(Sender: TObject);
begin
  radiobutton1.Checked := False;
  radiobutton2.Checked := False;
  radiobutton3.Checked := True;
end;

If you have any more questions put.

Answer 2

Implements the following code:

procedure TForm1.Image1Click(Sender: TObject);
begin
  RadioButton1.Checked := Sender = Image1;
  RadioButton2.Checked := Sender = Image2;
  RadioButton3.Checked := Sender = Image3;
end;