david
fff1b2a4dc
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.SDAC@3 6f543ec7-021b-7e4c-98c9-62eafc7fb9a8
52 lines
2.1 KiB
ObjectPascal
52 lines
2.1 KiB
ObjectPascal
program SdacDemo;
|
|
|
|
{$I Base\DacDemo.inc}
|
|
|
|
uses
|
|
Forms,
|
|
CategoryFrame in 'Base\CategoryFrame.pas' {CategoryFrame},
|
|
DemoBase in 'Base\DemoBase.pas',
|
|
DemoForm in 'Base\DemoForm.pas' {DemoForm},
|
|
DemoFrame in 'Base\DemoFrame.pas' {DemoFrame},
|
|
HtmlConsts in 'Base\HtmlConsts.pas',
|
|
VTable in 'VirtualTable\VTable.pas',
|
|
SdacAbout in 'Base\SdacAbout.pas' {SdacAboutForm},
|
|
CachedUpdates in 'CachedUpdates\CachedUpdates.pas' {CachedUpdates},
|
|
UpdateAction in 'CachedUpdates\UpdateAction.pas' {UpdateAction},
|
|
ConnectDialog in 'ConnectDialog\ConnectDialog.pas' {ConnectDialog},
|
|
{$IFDEF CRDBGRID}
|
|
CRDBGrid in 'CRDBGrid\CRDBGrid.pas' {CRDBGrid},
|
|
{$ENDIF}
|
|
FetchAll in 'FetchAll\FetchAll.pas' {FetchAll},
|
|
LongStrings in 'LongStrings\LongStrings.pas' {LongStringsFrame},
|
|
MasterDetail in 'MasterDetail\MasterDetail.pas' {MasterDetail},
|
|
Pictures in 'Pictures\Pictures.pas' {Pictures},
|
|
ServerCursors in 'ServerCursors\ServerCursors.pas' {ServerCursors},
|
|
Sql in 'Sql\Sql.pas' {SqlFrame},
|
|
StoredProc in 'StoredProc\StoredProc.pas' {StoredProcFrame},
|
|
StoredProcUpdates in 'StoredProcUpdates\StoredProcUpdates.pas' {StoredProcUpdatesFrame},
|
|
Table in 'Table\Table.pas' {TableFrame},
|
|
Text in 'Text\Text.pas' {TextFrame},
|
|
Threads in 'Threads\Threads.pas' {ThreadsFrame},
|
|
ThreadsData in 'Threads\ThreadsData.pas' {ThreadsData: TDataModule},
|
|
UpdateSQL in 'UpdateSQL\UpdateSQL.pas' {UpdateSQLFrame},
|
|
SdacDemoForm in 'Base\SdacDemoForm.pas' {SdacForm},
|
|
Query in 'Query\Query.pas' {QueryFrame: TFrame},
|
|
FilterAndIndex in 'FilterAndIndex\FilterAndIndex.pas',
|
|
{$IFNDEF STD}
|
|
Loader in 'Loader\Loader.pas',
|
|
Fetch in 'Loader\Fetch.pas' {FetchForm},
|
|
ServiceBroker in 'ServiceBroker\ServiceBroker.pas' {ServiceBrokerFrame: TFrame},
|
|
{$ENDIF}
|
|
InheritedConnectForm in 'ConnectDialog\InheritedConnectForm.pas' {fmInheritedConnect},
|
|
MyConnectForm in 'ConnectDialog\MyConnectForm.pas' {fmMyConnect};
|
|
|
|
{$R *.res}
|
|
|
|
begin
|
|
Application.Initialize;
|
|
Application.CreateForm(TSdacForm, SdacForm);
|
|
Application.CreateForm(TSdacAboutForm, SdacAboutForm);
|
|
Application.Run;
|
|
end.
|