中でも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; |
delphi >