20 lines
411 B
ObjectPascal
20 lines
411 B
ObjectPascal
program StructStorageExample;
|
|
|
|
|
|
{$I jcl.inc}
|
|
|
|
uses
|
|
Forms,
|
|
StructStorageExampleMain in 'StructStorageExampleMain.pas' {frmMain},
|
|
PropsFrm in 'PropsFrm.pas' {frmProps};
|
|
|
|
{$R *.RES}
|
|
{$R ..\..\..\source\windows\JclCommCtrlAsInvoker.res}
|
|
|
|
begin
|
|
Application.Initialize;
|
|
Application.Title := 'Compound Document Editor';
|
|
Application.CreateForm(TfrmMain, frmMain);
|
|
Application.Run;
|
|
end.
|