df.~dpr

这是一个非常使用的DELPHI源码的例子,用的是SQL数据库和DELPHI企业版

program Df;

uses
  Forms,
  U_Main in 'U_Main.pas' {Frm_main},
  U_Card in 'Utils\U_Card.pas',
  U_Public_Define in 'Utils\U_Public_Define.pas',
  U_data in 'Utils\U_data.pas' {Data: TDataModule},
  U_Configure_DataBase in 'Utils\U_Configure_DataBase.pas' {Frm_Configure_Database};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '明日科技模拟打饭系统';
  Application.CreateForm(TFrm_main, Frm_main);
  Application.CreateForm(TData, Data);
  Application.CreateForm(TFrm_Configure_Database, Frm_Configure_Database);
  Application.Run;
end.