procedure TfrmP2K_RingStyles.spSkinComboBox1Change(Sender: TObject);
var
  curIndex: byte;
begin
  curIndex:= TspSkinComboBox(Sender).ItemIndex;
  zIdx:= curIndex;
  spSkinComboBox4.ItemIndex:= xRingStyles[curIndex].Line1.Idx;

  spSkinComboBox5.ItemIndex:= xRingStyles[curIndex].Line2.Idx;
  spSkinComboBox6.ItemIndex:= xRingStyles[curIndex].Call.Idx;
  spSkinComboBox7.ItemIndex:= xRingStyles[curIndex].TextMsg.Idx;
  spSkinComboBox9.ItemIndex:= xRingStyles[curIndex].Alarms.Idx;
  spSkinComboBox8.ItemIndex:= xRingStyles[curIndex].VoiceMail.Idx;
  spSkinComboBox11.ItemIndex:= xRingStyles[curIndex].DataCalls.Idx;
  spSkinComboBox10.ItemIndex:= xRingStyles[curIndex].InfoService.Idx;
  spSkinComboBox13.ItemIndex:= xRingStyles[curIndex].FAxCalls.Idx;
  spSkinComboBox12.ItemIndex:= xRingStyles[curIndex].IM.Idx;
  spSkinComboBox15.ItemIndex:= xRingStyles[curIndex].AIM.Idx;
  spSkinComboBox14.ItemIndex:= xRingStyles[curIndex].AnswerMAchine.Idx;
  spSkinSpinEdit1.Value:= xRingStyles[curIndex].Volume;
  spSkinSpinEdit2.Value:= xRingStyles[curIndex].KeyVolume;
  spSkinComboBox3.ItemIndex:= xRingStyles[curIndex].IDs;
  spSkinComboBox2.ItemIndex:= xRingStyles[curIndex].Reminder;
 
end;