servers组件上的控件怎么用，怎样才能用它们读取excel文件

Question

rt

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    begin
      try
        ExcelApplication1.Connect;
      except
        ShowMessage('Connect excel error');
        Exit;
      end;
      ExcelApplication1.Visible[0]:=True;
    end;
  except
    on E:Exception do
    begin
      Application.ShowException(E);
      ExcelApplication1.Disconnect;
    end;
  end;
end;