david
2824855ea7
- Recompilación en Delphi10 de todos los paquetes de RO para generar las DCU's en Lib\D10 - Recompilación en Delphi10 de todos los paquetes de DA para generar las DCU's en Lib\D10 git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@9 b6239004-a887-0f4b-9937-50029ccdca16
57 lines
1.1 KiB
ObjectPascal
57 lines
1.1 KiB
ObjectPascal
unit uDAIDEData;
|
|
|
|
{----------------------------------------------------------------------------}
|
|
{ Data Abstract Library - IDE Library
|
|
{
|
|
{ compiler: Delphi 6 and up, Kylix 3 and up
|
|
{ platform: Win32, Linux
|
|
{
|
|
{ (c)opyright RemObjects Software. all rights reserved.
|
|
{
|
|
{ Using this code requires a valid license of the Data Abstract
|
|
{ which can be obtained at http://www.remobjects.com.
|
|
{----------------------------------------------------------------------------}
|
|
|
|
{$IFDEF LINUX}
|
|
{$I ../DataAbstract.inc}
|
|
{$ELSE}
|
|
{$I ..\DataAbstract.inc}
|
|
{$ENDIF}
|
|
|
|
interface
|
|
|
|
uses
|
|
{$IFDEF DELPHI5}Forms,{$ENDIF}
|
|
SysUtils, Classes
|
|
{$IFDEF WIN32}
|
|
, ImgList, Controls, Dialogs;
|
|
{$ENDIF}
|
|
{$IFDEF LINUX}
|
|
,QDialogs, QImgList;
|
|
{$ENDIF}
|
|
|
|
type
|
|
TDAIdeData = class(TDataModule)
|
|
iml_Actions: TImageList;
|
|
dlg_OpenBriefcase: TOpenDialog;
|
|
dlg_SaveBriefcase: TSaveDialog;
|
|
private
|
|
{ Private declarations }
|
|
public
|
|
{ Public declarations }
|
|
end;
|
|
|
|
const
|
|
ICON_REGENERATE = 1;
|
|
ICON_IMPORT = 2;
|
|
ICON_MAKESERVER = 3;
|
|
|
|
{var
|
|
DAIdeData: TDAIdeData;}
|
|
|
|
implementation
|
|
|
|
{$R *.dfm}
|
|
|
|
end.
|