list view i pliki txt

Mam list view z dwoma kolumnami nazwa i tekst oraz plik txt o takiej tresci:
nazwa1,tekst1
nazwa2,tekst2

Chce wczytac do list view do kolumny pierwszej nazwa 1 a do drugiej tekst1 bez przecinków jak to zrobić???

TextFile + Split (źródła b4p) or Explode(download) potem wczytywanie z pliku linijki, podział wzgl ',' i do listview do kolumny pierwszej idzie pierwszy element tablicy, a do drugiej kolumny drugi element tablicy.

Albo wczytaj do TStringList, lec po kolejnych itemach listy rozdzielaj je wg przecinka (Pos+Delete, albo Pos+LeftStr,RightStr (uses StrUtils)) i w tej samej petli tworz kolejne itemy listview i przypisuj jak trzeba

Może jakieś źródełko???? [hurra]

Nie wiem czy o to chodzi, ale to przecieŻ jest chyba na tej sronie.... :-/
W FAQ...

procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
S1,S2: String;
Plik: TStringList;
ListItem : TListItem;
begin
Plik:=TStringList.Create;
Plik.LoadFromFile('1.txt');
for I:=0 to Plik.Count-1 do
begin
S1:=Copy(Plik[I],1,Pos(',',Plik[I])-1);
S2:=Copy(Plik[I],Pos(',',Plik[I])+1, Length(Plik[I]));
with ListView1 do
ListItem:=Items.Add;
ListItem.Caption:=S1;
ListItem.SubItems.Add(S2);
end;
Plik.Free;
end;