Componentes.Terceros.DevExp.../official/x.19/ExpressNavBar/Demos/Delphi/FeaturesDemo/FeaturesDemo.dpr
2007-09-09 11:27:22 +00:00

26 lines
610 B
ObjectPascal

program FeaturesDemo;
uses
dxGDIPlusAPI,
Forms,
FeaturesMain in 'FeaturesMain.pas' {fmFeaturesMain},
FeaturesDialog in 'FeaturesDialog.pas' {fmFeaturesDailog},
NavBarUtils in '..\Common\NavBarUtils.pas' {dmCommonData: TDataModule};
{$R *.RES}
var
ADialog: TForm;
begin
Application.Initialize;
Application.CreateForm(TdmCommonData, dmCommonData);
Application.CreateForm(TfmFeaturesMain, fmFeaturesMain);
if not CheckGdiPlus then
begin
ADialog := TfmFeaturesDailog.Create(Application);
ADialog.ShowModal;
ADialog.Free;
end;
Application.Run;
end.