tydchx1.dpr

来自「运筹学算法与编程实践附书源码」· DPR 代码 · 共 19 行

program tydchx1;

uses
  Forms,
  shuru in 'shuru.pas' {frmshuru},
  jisuan2 in 'jisuan2.pas' {frmjisuan2},
  jisuan1 in 'jisuan1.pas' {frmjisuan1};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '二阶段法';
  Application.CreateForm(Tfrmshuru, frmshuru);
  Application.CreateForm(Tfrmjisuan2, frmjisuan2);
  Application.CreateForm(Tfrmjisuan1, frmjisuan1);
  Application.Run;
end.