Hallo Headi,
ohne deinen sonstigen Code zu verändern? Du kannst die Zeilen direkt nach dem LoadFromFile() entfernen:
Delphi-Quellcode:
procedure DeleteComments(s: TStrings; meta: char);
var
i: integer;
begin
for i := Pred(s.Count) downto 0 do
if Copy(s[i], 1, 1) = meta then
s.Delete(i);
end;
Nur eine von vielen möglichen Lösungen für dein Problem.
Neujahrsgrüße vom marabu