加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
克隆/下载
QingzhouShow.ppr 850 Bytes
一键复制 编辑 原始数据 按行查看 历史
JiangXiaoDong 提交于 2021-10-06 23:22 . Init
program QingzhouShow;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, mainform, datamodule, debugform, progresform, playerform, sqlform,
aboutform, singlecodeform
{ you can add units after this };
{$R *.res}
begin
Application.Title:='青州杭创HIS光学组网编码器 1.3';
RequireDerivedFormResource:=True;
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
Application.CreateForm(TfrmDebug, frmDebug);
Application.CreateForm(TDm, Dm);
Application.CreateForm(TfrmProgres, frmProgres);
Application.CreateForm(TfrmPlayer, frmPlayer);
Application.CreateForm(TfrmSQL, frmSQL);
Application.CreateForm(TfrmAbout, frmAbout);
Application.CreateForm(TfrmSingleCode, frmSingleCode);
Application.Run;
end.
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化