qdlgapply.dpr

来自「delphi6从入门到精通随书源码」· DPR 代码 · 共 19 行

program QDlgApply;

uses
  QForms,
  Main in 'Main.pas' {Form1},
  StyleD in 'StyleD.pas' {StyleDial},
  ListD in 'ListD.pas' {ListDial};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TStyleDial, StyleDial);
  Application.CreateForm(TListDial, ListDial);
  Application.Run;
end.