56 lines
1.5 KiB
ObjectPascal
56 lines
1.5 KiB
ObjectPascal
unit uROIDEData;
|
|
|
|
{----------------------------------------------------------------------------}
|
|
{ RemObjects SDK Library - Core Library }
|
|
{ }
|
|
{ compiler: Delphi 5 and up, Kylix 2 and up }
|
|
{ platform: Win32, Linux }
|
|
{ }
|
|
{ (c)opyright RemObjects Software. all rights reserved. }
|
|
{ }
|
|
{ Using this code requires a valid license of the RemObjects SDK }
|
|
{ which can be obtained at http://www.remobjects.com. }
|
|
{----------------------------------------------------------------------------}
|
|
|
|
{$IFNDEF MSWINDOWS}
|
|
{$I ../RemObjects.inc}
|
|
{$ELSE}
|
|
{$I ..\RemObjects.inc}
|
|
{$ENDIF}
|
|
|
|
interface
|
|
|
|
uses
|
|
{$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
|
|
{$IFDEF DELPHI5}Forms,{$ENDIF}
|
|
SysUtils, Classes, ImgList, Controls;
|
|
|
|
type
|
|
TIdeData = class(TDataModule)
|
|
iml_Actions: TImageList;
|
|
private
|
|
{ Private declarations }
|
|
public
|
|
{ Public declarations }
|
|
end;
|
|
|
|
const
|
|
ICON_REGENERATE = 1;
|
|
ICON_IMPORT = 2;
|
|
ICON_MAKESERVER = 3;
|
|
|
|
var
|
|
IdeData: TIdeData;
|
|
|
|
implementation
|
|
|
|
{$IFNDEF FPC}
|
|
{$R *.dfm}
|
|
{$ENDIF}
|
|
|
|
{$IFDEF FPC}
|
|
initialization
|
|
{$I uROIDEData.lrs}
|
|
{$ENDIF FPC}
|
|
end.
|