Program z wykorzystaniem stylów

Jak zrobić że np. przy uruchamianiu programu
program sprawdza zawartość katalogu np. /style

gdzie są przykładowo pliki:

styl_Spiderman.cfg
styl_Superman.cfg

i wyświetla następnie taką liste do wyboru w ComboBox1,
z tym że nie wyświetla jej następująco:
[code]
styl_Spiderman.cfg
styl_Superman.cfg
[/code]

tylko tak:
[code]
Spiderman
Superman
[/code]

czyli ucina pierwsze 5 i ostatnie 4 znaki

Pozdro

najlepiej uzyj komendy Copy. Ja Ci przedstawie prost funkcje:
<font color="blue">

function Styl(Value:String):String;
begin
Result := Copy(Value,6,Length(Value)-4);
end;
</span>

Chyba raczej tak:

function Styl(Value: String): String;
begin
Result:=Copy(Value, 6, Length(Value) - 9);
end;