1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
unit dmImages;
{$mode ObjFPC}{$H+}
interface
uses
Classes, SysUtils, LResources, Controls;
// Some selected image indices to simplify updating images.
const
iiConnection = 0;
iiTables = 1;
iiTable = 2;
iiFields = 3;
iiField = 4;
iiIndexes = 5;
iiIndex = 27;
iiTableData = 7;
iiIndexFields = 8;
iiIndexOptions = 9;
iiConnections = 30;
iiDataDict = 32;
type
{ TImgDatamodule }
TImgDatamodule = class(TDataModule)
AppImages: TImageList;
DBNavigatorImages: TImageList;
private
public
end;
var
ImgDatamodule: TImgDatamodule;
implementation
{$R *.lfm}
end.
|
