delphi中调用excel表的问题，请指教

我在c:\my dcuments中做了一个excel表，我在程序中想调用此表并进行打印，我该如何下：如下代码错误在哪里？
procedure TfmBJForm.DYButtonClick(Sender: TObject);
  var
    NewTextFile:textfile;
  begin
    assignFile(NewTextFile, 'c:\my documents\124');
    try
      reset(NewTextFile);
      try
        finally
          closefile(NewTextFile);
      end;
    except
      showmessage('打开文件失败！！');    end;
  end;