mini_projects/miniprojects/PixelEditor/unit2.lfm at main · PascalCorpsman/mini_projects · 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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
object Form2: TForm2
  Left = 365
  Height = 251
  Top = 117
  Width = 318
  BorderStyle = bsDialog
  Caption = 'Form2'
  ClientHeight = 251
  ClientWidth = 318
  Color = clGray
  Position = poScreenCenter
  LCLVersion = '4.99.0.0'
  OnCreate = FormCreate
  object CheckBox1: TCheckBox
    Left = 16
    Height = 22
    Top = 8
    Width = 128
    Caption = 'Grid above image'
    Font.Color = clSilver
    ParentFont = False
    TabOrder = 0
  end
  object Button1: TButton
    Left = 8
    Height = 25
    Top = 216
    Width = 304
    Caption = 'OK'
    Color = clGray
    Font.Color = clSilver
    ModalResult = 1
    ParentFont = False
    TabOrder = 1
  end
  object ComboBox1: TComboBox
    Left = 32
    Height = 26
    Top = 120
    Width = 280
    Color = clGray
    Font.Color = clSilver
    ItemHeight = 0
    ItemIndex = 2
    Items.Strings = (
      'PixelEditor'
      'Windows BMP'
      'Portable Network Graphik PNG'
    )
    ParentFont = False
    Style = csDropDownList
    TabOrder = 2
    Text = 'Portable Network Graphik PNG'
  end
  object Label1: TLabel
    Left = 16
    Height = 16
    Top = 96
    Width = 111
    Caption = 'Default fileending'
    Font.Color = clSilver
    ParentFont = False
  end
  object CheckBox2: TCheckBox
    Left = 16
    Height = 22
    Top = 180
    Width = 154
    Caption = 'Auto inc size of image'
    Font.Color = clSilver
    ParentFont = False
    TabOrder = 3
  end
  object CheckBox3: TCheckBox
    Left = 16
    Height = 22
    Top = 36
    Width = 269
    Caption = 'Show transparent pattern in background'
    Font.Color = clSilver
    ParentFont = False
    TabOrder = 4
  end
  object CheckBox4: TCheckBox
    Left = 16
    Height = 22
    Top = 152
    Width = 174
    Caption = 'Show RGB-Values as HEX'
    Font.Color = clSilver
    ParentFont = False
    TabOrder = 5
  end
  object ScrollBar1: TScrollBar
    Left = 80
    Height = 14
    Top = 67
    Width = 169
    Max = 10
    Min = 1
    PageSize = 0
    Position = 1
    TabOrder = 6
    OnChange = ScrollBar1Change
  end
  object Label2: TLabel
    Left = 40
    Height = 16
    Top = 65
    Width = 31
    Caption = 'Scale'
    Font.Color = clSilver
    ParentFont = False
  end
  object Label3: TLabel
    Left = 256
    Height = 16
    Top = 65
    Width = 41
    Caption = 'Label3'
    Font.Color = clSilver
    ParentFont = False
  end
end