stock.dpr

来自「不完备信息的数据发现」· DPR 代码 · 共 44 行

program Stock;

uses
  Forms,
  main_page in 'main_page.pas' {main_pagef},
  ldqlb in 'ldqlb.pas' {ldqlbf},
  lgyslb in 'lgyslb.pas' {lgyslbf},
  lgysda in 'lgysda.pas' {lgysdaf},
  xgyslb in 'xgyslb.pas' {xgyslbf},
  xdqlb in 'xdqlb.pas' {xdqlbf},
  dm in 'dm.pas' {DMf: TDataModule},
  lrklb in 'lrklb.pas' {lrklbf},
  lproductinfo in 'lproductinfo.pas' {lproductinfof},
  lprore in 'lprore.pas' {lproref},
  de in 'de.pas' {def},
  ldgysda in 'ldgysda.pas' {ldgysdaf},
  upedit in 'upedit.pas' {upeditf},
  lproductex in 'lproductex.pas' {lproductexf},
  price in 'price.pas' {pricef},
  llow in 'llow.pas' {llowf},
  upper in 'upper.pas' {upf},
  ljd in 'ljd.pas' {Form2},
  ljdf in 'ljdf.pas' {Form3},
  lsizeset in 'lsizeset.pas' {lsizesetf},
  lspeed in '..\..\Stock\lspeed.pas' {lspeedf},
  Unit1 in 'Unit1.pas' {ldproductinfof},
  jd1f in 'jd1f.pas' {jd1},
  jd2 in '..\..\Stock\jd2.pas' {jd2f};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(Tmain_pagef, main_pagef);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(Tlsizesetf, lsizesetf);
  Application.CreateForm(Tlspeedf, lspeedf);
  Application.CreateForm(Tldproductinfof, ldproductinfof);
  Application.CreateForm(Tjd1, jd1);
  Application.CreateForm(Tjd2f, jd2f);
  Application.Run;
end.