Uproszczenie kodu..

Mam kod:
[code]
case kraje.ItemIndex of
0 : costam.URL:=Ini.ReadString('0adres',stacje.Items[stacje.ItemIndex],'');
1 : costam.URL:=Ini.ReadString('1adres',stacje.Items[stacje.ItemIndex],'');
2 : costam.URL:=Ini.ReadString('2adres',stacje.Items[stacje.ItemIndex],'');
3 : costam.URL:=Ini.ReadString('3adres',stacje.Items[stacje.ItemIndex],'');
end;[/code]
Jak można łatwo zauważyć :) numer przed słowem adres to numer zaznaczonego itema. Jak zrobić, by delphi automatycznie przed słowem adres dodawał numer itema? Jeżeli nie to czy mógłbym prosić o podanie linka do jakiegoś kursu/gotowca gdzie jest wyjaśnione jak coś takiego zrobić?

costam.URL := Ini.ReadString(IntToStr(kraje.ItemIndex) + 'adres', stacje.Items[stacje.ItemIndex], '');

Dzięki :)