[Zylex]

Можно в StringGrid отобразить.
Вот вариант с использованием openDialog.

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
   s :TStringlist;
   i,j:Integer;
   Str:String;
   y, x: Integer;

Begin
    with TOpenDialog.Create(Owner) do
    begin
       DefaultExt:='.txt';
       Filter:= 'txt|*.txt';
       if not Execute then exit;
       S:=TStringList.Create;
       S.LoadFromFile(FileName);
       For y := 1 to S.Count do
       begin
           x := 0;
           Str := '';
           For i := 1 to Length(S.Strings[y-1]) do
           begin
              if S.Strings[y-1][i] <> ' ' then
                  Str := Str + S.Strings[y-1][i]
              else
              begin
                 StringGrid1.Cells[x, y-1] := Str;
                 Str := '';
                 inc(x);
              end;
           end;
       end;
    end;
    S.Free;
end;