开始学DELPHI：怎么将一个 .txt中的一个个数据（已用空格格开）读入一个变量（数组）中？？？

Question

用TStringList 啊
如：
Var
  ssTemp : TStringList;
begin
  ssTemp := TStringList.Create;
  ssTemp.CommaText := 'a b c';
//  ssTemp.Strings[0] 即为'a',以此类推
  ssTemp.Free;
end;

Answer 1

用TStringList可以实现
procedure TForm1.Button2Click(Sender: TObject);
var
  strList: TStringList;
begin
  strList := TStringList.Create;
  OpenDialog1.Filter := 'Text files (*.txt)|*.TXT|Pascal files (*.pas)|*.PAS';
  if OpenDialog1.Execute then
    strList.LoadFromFile(OpenDialog1.fileName);
  //......
  
  memo1.Lines.Assign(strList);
end;

Answer 2

还是不行：如何将 strList.LoadFromFile(OpenDialog1.fileName); 后，将 strList.CommaText  改为   strList.CommaText := 'a b c';  的形式？？？

Answer 3

同意Raptor(猛禽)　，WuHeHai(河海)　
搞定没？

Answer 4

用一个StringList来LoadFromFile，再用另一个StringList.CommaText := 前一个StringList.Text即可。