Form'un rengini değiştirmek (radiobutton'lar kullanarak)

procedure TForm1.RadioButton1Click(Sender: TObject);
begin
form1.Color:=clRed;
end;

procedure TForm1.RadioButton2Click(Sender: TObject);
begin
form1.color:=clGreen;
end;

procedure TForm1.RadioButton3Click(Sender: TObject);
begin
form1.color:=clBlue;
end;

procedure TForm1.RadioButton4Click(Sender: TObject);
begin
form1.color:=clBtnFace;
end;

end.