-
Notifications
You must be signed in to change notification settings - Fork 20
/
Copy pathLogViewer.Image.View.dfm
155 lines (155 loc) · 3.37 KB
/
LogViewer.Image.View.dfm
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
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
object frmImageView: TfrmImageView
Left = 0
Top = 0
ClientHeight = 909
ClientWidth = 684
Color = clWhite
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Style = []
ShowHint = True
TextHeight = 13
object edtPixelFormat: TLabeledEdit
Left = 303
Top = 3
Width = 73
Height = 17
Alignment = taCenter
BevelOuter = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditLabel.Width = 63
EditLabel.Height = 17
EditLabel.Caption = 'Pixel format:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = ''
end
object edtHandleType: TLabeledEdit
Left = 448
Top = 3
Width = 73
Height = 17
Alignment = taCenter
BevelOuter = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditLabel.Width = 65
EditLabel.Height = 17
EditLabel.Caption = 'Handle type:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = ''
end
object edtHeight: TLabeledEdit
Left = 160
Top = 3
Width = 73
Height = 17
Alignment = taCenter
BevelOuter = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditLabel.Width = 38
EditLabel.Height = 17
EditLabel.Caption = 'Height:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = ''
end
object edtWidth: TLabeledEdit
Left = 40
Top = 3
Width = 73
Height = 17
Alignment = taCenter
BevelOuter = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditLabel.Width = 35
EditLabel.Height = 17
EditLabel.Caption = 'Width:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Style = [fsBold]
LabelPosition = lpLeft
ParentFont = False
ReadOnly = True
TabOrder = 3
Text = ''
end
object sbxMain: TScrollBox
Left = 0
Top = 21
Width = 684
Height = 888
HorzScrollBar.Smooth = True
HorzScrollBar.Tracking = True
VertScrollBar.Smooth = True
VertScrollBar.Tracking = True
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
BevelEdges = []
BevelInner = bvNone
BorderStyle = bsNone
Color = clWhite
ParentColor = False
TabOrder = 4
ExplicitWidth = 678
ExplicitHeight = 871
object imgBitmap: TImage
Left = 3
Top = 3
Width = 676
Height = 585
AutoSize = True
Center = True
IncrementalDisplay = True
PopupMenu = ppmMain
Proportional = True
end
end
object aclMain: TActionList
Left = 512
Top = 176
object actCopy: TAction
Caption = 'Copy'
Hint = 'Copy image to clipboard'
OnExecute = actCopyExecute
end
end
object ppmMain: TPopupMenu
Left = 432
Top = 179
object mniCopy: TMenuItem
Action = actCopy
ShortCut = 16451
end
end
end