hmmm.... den letteste, men også den metode jeg ville kalde mest uprofesionel ville være at lave en memo med visible = False og så åbne filen ind i memoen ved hjælp af memo1.lines.loadfromfile('filnavn')
Her efter kunne du så lave en for løkke, noget med
for i := 0 to memo1.lines.count-1 do
begin
memo1.lines[i] // <-- giver værdien for en linie afgangen, hvorefter du så kan generere dem ind i en listview
end;
og så får du nok brug for borrisholts splitfunktion:
Function ResolveNextToken(var s : String; Token : String) : String;
var
j : Integer;
begin
Result := \'\';
if s=\'\' then
Exit;
j:= Pos(Token,s);
if j <> 0 then
begin
dec(j);
Result:=copy (s,1,j);
Delete(s,1,j+ Length(Token));
end
else
begin
Result:=s;
s:= \'\';
end
end;
(taget fra
http://www.eksperten.dk/spm/87786 )