data item ComboBox1

procedure TForm1.ComboBox1Change(Sender: TObject);

begin

if (combobox1.text='a') then

begin

 edit1.text:='gunadi' ;

 edit2.text:='gunadi';

end;

if (combobox1.text='b') then

begin

 edit1.text:='gunadi' ;

 edit2.text:='gdsdffd';

end;

if (combobox1.text='c') then

begin

 edit1.text:='gunadigfgfg' ;

 edit2.text:='gdsdffd';

end;

end;