ValueFromIndex работает только, если StringList состоит из строк такого вида
Name1 = Value1
Name2 = Value2
....
NameN = ValueN
где Name1,Name2,Value1,Value2 .. NameN,ValueN - произвольные строки разделённые символом равно
=.
Скорее всего в Вашем случае нужно писать
Код:
if (CB_vid_kred.Items[CB_vid_kred.ItemIndex]='автокредит')
and (CB_srok_kr.Items[CB_srok_kr]='3')
then
Edit1.Text:='13,5';