ShadowEngine/SpriteShapeBuilder/uNamedOptionsForm.fmx at master · dimsa/ShadowEngine · GitHub

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
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
object NamedOptionsForm: TNamedOptionsForm
  Left = 0
  Top = 0
  Caption = 'Options'
  ClientHeight = 406
  ClientWidth = 349
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [Desktop]
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  DesignerMasterStyle = 0
  object Grd: TStringGrid
    Anchors = [akLeft, akTop, akRight, akBottom]
    CanFocus = True
    ClipChildren = True
    Position.X = 8.000000000000000000
    Position.Y = 82.000000000000000000
    Size.Width = 334.000000000000000000
    Size.Height = 279.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 0
    RowHeight = 21.000000000000000000
    Viewport.Width = 314.000000000000000000
    Viewport.Height = 238.000000000000000000
    object ParamName: TStringColumn
      Header = 'Param'
      ReadOnly = True
      Size.Width = 153.000000000000000000
    end
    object ParamValue: TStringColumn
      Header = 'Value'
      Size.Width = 177.000000000000000000
    end
  end
  object ElementPointsLbl: TLabel
    Position.X = 8.000000000000000000
    Position.Y = 61.000000000000000000
    Text = 'Object Parametres'
  end
  object ApplyBtn: TButton
    Anchors = [akRight, akBottom]
    Position.X = 261.000000000000000000
    Position.Y = 372.000000000000000000
    Size.Width = 80.000000000000000000
    Size.Height = 25.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 4
    Text = 'Apply'
    OnClick = ApplyBtnClick
  end
  object CancelBtn: TButton
    Anchors = [akRight, akBottom]
    Position.X = 173.000000000000000000
    Position.Y = 372.000000000000000000
    Size.Width = 80.000000000000000000
    Size.Height = 25.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 3
    Text = 'Cancel'
    OnClick = CancelBtnClick
  end
  object ElementNameEdt: TEdit
    Touch.InteractiveGestures = [LongTap, DoubleTap]
    Anchors = [akLeft, akTop, akRight]
    TabOrder = 1
    Text = 'ds'
    Position.X = 8.000000000000000000
    Position.Y = 32.000000000000000000
    Size.Width = 335.000000000000000000
    Size.Height = 22.000000000000000000
    Size.PlatformDefault = False
  end
  object ElementNameLbl: TLabel
    Anchors = [akLeft, akTop, akRight]
    Position.X = 8.000000000000000000
    Position.Y = 11.000000000000000000
    Size.Width = 200.000000000000000000
    Size.Height = 17.000000000000000000
    Size.PlatformDefault = False
    Text = 'Element Name'
  end
end