pquery_fee.dpr

来自「电信计费帐务系统话费查询营业厅触摸屏界面」· DPR 代码 · 共 30 行

program Pquery_fee;

uses
  Forms,
  Uquery_main in 'Uquery_main.pas' {query_main},
  Uq_sum in 'Uq_sum.pas' {q_sum},
  Uinfo_list in 'Uinfo_list.pas' {info_list},
  Ul_dist_list in 'Ul_dist_list.pas' {l_dist_list},
  Uq_yue in 'Uq_yue.pas' {q_yue},
  Uform_message in 'Uform_message.pas' {Form_message},
  Umainface in 'Umainface.pas' {mainface},
  Uquery_work_order in 'Uquery_work_order.pas' {query_work_order},
  Uwork_order_detail in 'Uwork_order_detail.pas' {work_order_detail};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(Tmainface, mainface);
  Application.CreateForm(Tquery_main, query_main);
  Application.CreateForm(TForm_message, Form_message);
  Application.CreateForm(Tq_sum, q_sum);
  Application.CreateForm(Tinfo_list, info_list);
  Application.CreateForm(Tl_dist_list, l_dist_list);
  Application.CreateForm(Tq_yue, q_yue);
  Application.CreateForm(Tquery_work_order, query_work_order);
  Application.CreateForm(Twork_order_detail, work_order_detail);
  Application.Run;
end.