在Delphi中如何调用Excel的规划求解(100分)

  • 主题发起人 主题发起人 lzb6689
  • 开始时间 开始时间
L

lzb6689

Unregistered / Unconfirmed
GUEST, unregistred user!
我想利用Excel的规划求解来解决计算中所遇到的非线性方程组问题,请问在Delphi中如何调用Excel的规划求解功能?
 
调用Excel的函数,就相当于给结果单元格设置公式, <br><br>procedure TForm1.Button1Click(Sender: TObject); <br>begin <br> xlapp := CreateOleObject('excel.application'); <br> xlapp.visible := true; <br> xlApp.DisplayAlerts := False; <br> xlapp.workbooks.add; <br> xlSheet := xlapp.workbooks[1].sheets[1]; <br>end; <br><br>// set excel cell value <br>procedure TForm1.Button2Click(Sender: TObject); <br>begin <br> xlSheet.Cells(1, 1) := '1'; <br> xlSheet.Cells(1, 2) := '2'; <br> xlSheet.Cells(1, 3) := '=SUM(A1:B1)'; &nbsp;//求和 <br> xlSheet.Cells(1, 4) := '=AVERAGE(A1:B1)';//求平均值
 
谢谢SmallGhost,可是我的问题还是没有得到解决,我要问的是调用Excel的规划求解问题.
 
后退
顶部