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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
unit ideimages;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils;
procedure RegisterIDEImages;
implementation
uses
fpg_main;
const
ide_gutter_vertical : Array[0..437] of byte = (
66, 77,182, 1, 0, 0, 0, 0, 0, 0, 54, 0, 0, 0, 40, 0, 0,
0, 15, 0, 0, 0, 8, 0, 0, 0, 1, 0, 24, 0, 0, 0, 0, 0,
128, 1, 0, 0,196, 14, 0, 0,196, 14, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0,187,160,131,243,220,191,247,227,200,243,221,194,239,215,
187,235,210,183,231,206,179,226,198,167,224,196,162,226,197,166,224,
199,168,224,199,168,226,204,175,203,175,144,255,255,255, 0, 0, 0,
187,160,131,243,220,191,247,227,200,243,221,194,239,215,187,235,210,
183,231,206,179,226,198,167,224,196,162,226,197,166,224,199,168,224,
199,168,226,204,175,203,175,144,255,255,255, 0, 0, 0,187,160,131,
243,220,191,247,227,200,243,221,194,239,215,187,235,210,183,231,206,
179,226,198,167,224,196,162,226,197,166,224,199,168,224,199,168,226,
204,175,203,175,144,255,255,255, 0, 0, 0,187,160,131,243,220,191,
247,227,200,243,221,194,239,215,187,235,210,183,231,206,179,226,198,
167,224,196,162,226,197,166,224,199,168,224,199,168,226,204,175,203,
175,144,255,255,255, 0, 0, 0,187,160,131,243,220,191,247,227,200,
243,221,194,239,215,187,235,210,183,231,206,179,226,198,167,224,196,
162,226,197,166,224,199,168,224,199,168,226,204,175,203,175,144,255,
255,255, 0, 0, 0,187,160,131,243,220,191,247,227,200,243,221,194,
239,215,187,235,210,183,231,206,179,226,198,167,224,196,162,226,197,
166,224,199,168,224,199,168,226,204,175,203,175,144,255,255,255, 0,
0, 0,187,160,131,243,220,191,247,227,200,243,221,194,239,215,187,
235,210,183,231,206,179,226,198,167,224,196,162,226,197,166,224,199,
168,224,199,168,226,204,175,203,175,144,255,255,255, 0, 0, 0,187,
160,131,243,220,191,247,227,200,243,221,194,239,215,187,235,210,183,
231,206,179,226,198,167,224,196,162,226,197,166,224,199,168,224,199,
168,226,204,175,203,175,144,255,255,255, 0, 0, 0);
procedure RegisterIDEImages;
begin
// system images. Change these to the composite arrow bmp that includes
// disabled state
//fpgImages.AddBMP(
// 'sys.sb.up',
// @stdimg_arrow_up,
// sizeof(stdimg_arrow_up));
fpgImages.AddMaskedBMP( // 60x12 in total. 5 images of 12x12 each.
'ide.guttervertical',
@ide_gutter_vertical,
sizeof(ide_gutter_vertical), 0,0);
end;
end.
|