File: v3dsceneimages.pas

package info (click to toggle)
view3dscene 4.2.0-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 13,824 kB
  • sloc: pascal: 3,961; sh: 330; xml: 261; makefile: 133
file content (64 lines) | stat: -rw-r--r-- 1,490 bytes parent folder | download
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
{ -*- buffer-read-only: t -*- }

{ Unit automatically generated by image-to-pascal tool,
  to embed images in Pascal source code.
  @exclude (Exclude this unit from PasDoc documentation.) }
unit V3DSceneImages;

interface

uses CastleImages;

function Warning_icon: TRGBAlphaImage;

function Examine: TRGBAlphaImage;

function Walk: TRGBAlphaImage;

function Fly: TRGBAlphaImage;

function Open: TRGBAlphaImage;

function Screenshot: TRGBAlphaImage;

function TooltipArrow: TRGBAlphaImage;

function Light_gizmo: TRGBAlphaImage;

function Animations: TRGBAlphaImage;

function Panel: TRGBAlphaImage;

function PanelSeparator: TRGBImage;

function Examine_tooltip: TRGBImage;

function Walk_fly_tooltip: TRGBImage;

implementation

uses SysUtils;

{ Actual image data is included from another file, with a deliberately
  non-Pascal file extension ".image_data". This way online code analysis
  tools will NOT consider this source code as an uncommented Pascal code
  (which would be unfair --- the image data file is autogenerated
  and never supposed to be processed by a human). }
{$I v3dsceneimages.image_data}

initialization
finalization
  FreeAndNil(FWarning_icon);
  FreeAndNil(FExamine);
  FreeAndNil(FWalk);
  FreeAndNil(FFly);
  FreeAndNil(FOpen);
  FreeAndNil(FScreenshot);
  FreeAndNil(FTooltipArrow);
  FreeAndNil(FLight_gizmo);
  FreeAndNil(FAnimations);
  FreeAndNil(FPanel);
  FreeAndNil(FPanelSeparator);
  FreeAndNil(FExamine_tooltip);
  FreeAndNil(FWalk_fly_tooltip);
end.