Witam. Wiem, że podobne tematy już istnieją ale w żadnym nie znalazłem odpowiedzi na mój problem.
Wywala mi błąd:
Project Project1.exe raised exception class EStringListError with message 'List index out of bounds(0)'.
I szczerze mówiąc już zgłupiałem dlaczego on wywala.
Oto kod:
S1 := TStringList.Create;
ExtractStrings(['.'], [], Pchar(Form6.Edit1.Text), S1);
(...)
S1.Free;
Poustawiałem sobie break pointy i wskazało kod:
S1 := TStringList.Create;
Może wy macie jakieś sugestie dlaczego on wywala. Dodam jeszcze, że do niedawna kod dział poprawnie. Dodałem 1 komponent na formkę i od tej pory sypie.