delphi - Delphiでparsedeimeterを使用してインデックスマトリックスを解析する方法

Question

このコードでスペース区切りを使用してインデックスマトリックスを解析したい

    Temp := TStringList.Create;
  Temp.LoadFromFile('training.txt');
  Row := 1;
  for I := 0 to Temp.Count-1 do
  begin
    S := Temp.Strings[I];
   ParseDelimited(Memo1.Lines, Trim(S), ' ');
    Inc(Row);
  end;

そのコードは、値の間に1つのスペースを含むインデックスマトリックスを解析するために使用されましたが、値の間に1つと2つのスペースを含むマトリックスがありますか? 誰でも私を助けることができます私は何をすべきですか？

Answer 1

TStrings クラスには CommaText プロパティがあります。それについて読んで使用してください。データ チャンク間の複数のスペースで適切に動作します。

var
  Temp, TempList: TStringList;
  i: Integer;
begin
  Temp := TStringList.Create;
  try
    TempList := TStringList.Create;
    try
      Temp.LoadFromFile('training.txt');
      for i := 0 to Temp.Count - 1 do begin
        TempList.CommaText := Temp[i];
        Memo1.Lines.AddStrings(TempList);
      end;
    finally
      TempList.Free;
    end;
  finally
    Temp.Free;
  end;