Jsi si jisty, ze ten index out of range je zpusobeny timto kodem? Podle mne k tomu dojde až později. Index ve stringlistu je cislovany od nuly a ty se podle mne snažíš natvrdo číst index 1.
Uvnitř cyklu si změň
if Eof(myFile)= true then Exit;if Eof(myFile) then break;