If I am reading this correctly (4am my time, no coffee yet)...
You want to eliminate the empty string(s) in a TStringList loaded from file?
I used the following in my current side project and it works, there are 3 rows:
for CTAHStrListRow := CTAHistoryStrList.Count - 1 downto 0 do
begin
if Trim(CTAHistoryStrList[CTAHStrListRow]) = '' then
begin
CTAHistoryStrList.Delete(CTAHStrListRow);
end;
end;
test it see if it works for you (change the naming convention to fit your needs) and if I didn't read it correctly, ignore it.
Regards,
-Mo