customcomponent.dpr

来自「运行时设计控件的一个小例子」· DPR 代码 · 共 20 行

program CustomComponent;

uses
  Forms,
  Main in 'Main.pas' {Form1},
  Test in 'Test.pas' {Form_Test},
  DataMoudle in 'DataMoudle.pas' {DM1: TDataModule},
  CustomUnit in 'CustomClass\CustomUnit.pas',
  uDrag in 'CustomClass\uDrag.pas',
  UDragPoint in 'CustomClass\UDragPoint.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TDM1, DM1);
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.