Biodata

procedure TForm2.Button1Click(Sender: TObject);
var i:char ;
begin
Label1.Caption := 'Nama' ;
Label2.Caption := 'Alamat';
Label3.Caption := 'Kelamin' ;
Label4.Caption := 'Kelas' ;
for I := 'A' to 'E' do begin

  ComboBox1.Items.Add(i) ;
end;

RadioButton1.Caption := 'Laki-Laki' ;
RadioButton2.Caption := 'Perempuan' ;
ComboBox1.ItemIndex := ComboBox1.Items.Count -1 ;
Edit1.Text := 'Indra Rani Dwi Putra' ;
Edit2.Text := 'Parepare , Perumnas' ;

end;