中でもTStringListクラスは使い勝手が良すぎて困るくらい。

以下のサンプルはstrlItemsの中に1レコード分の分割された値が格納される。

var

  i:Integer;

  strlLines: TStringList;

  strlItems: TStringList;

begin

  strlLines:=TStringList.Create;

  strlItems:=TStringList.Create;

  try

    strlLines.LoadFromFile('ファイルパス');

    for i:=0 to strlLines.Count-1 do

      begin

        strlItems.CommaText:=strlLines[i];

      end;

  finally

    strlLines.Clear;

    strlLines.Free;

    strlItems.Clear;

    strlItems.Free;

  end;

end;