Стартовый пул
This commit is contained in:
360
bgracontrols/bgrasvgimagelistform/bgrasvgimagelistform.lfm
Normal file
360
bgracontrols/bgrasvgimagelistform/bgrasvgimagelistform.lfm
Normal file
@@ -0,0 +1,360 @@
|
||||
object frmBGRASVGImageListEditor: TfrmBGRASVGImageListEditor
|
||||
Left = 480
|
||||
Height = 268
|
||||
Top = 141
|
||||
Width = 484
|
||||
Caption = 'BGRA SVG Image List'
|
||||
ClientHeight = 268
|
||||
ClientWidth = 484
|
||||
LCLVersion = '2.0.10.0'
|
||||
object ListBox1: TListBox
|
||||
Left = 8
|
||||
Height = 192
|
||||
Top = 40
|
||||
Width = 315
|
||||
Anchors = [akTop, akLeft, akBottom]
|
||||
ItemHeight = 16
|
||||
OnDrawItem = ListBox1DrawItem
|
||||
OnSelectionChange = ListBox1SelectionChange
|
||||
ScrollWidth = 313
|
||||
Style = lbOwnerDrawFixed
|
||||
TabOrder = 0
|
||||
TopIndex = -1
|
||||
end
|
||||
object btnAdd: TButton
|
||||
Left = 8
|
||||
Height = 25
|
||||
Top = 8
|
||||
Width = 75
|
||||
Caption = 'Add'
|
||||
OnClick = btnAddClick
|
||||
TabOrder = 1
|
||||
end
|
||||
object btnRemove: TButton
|
||||
Left = 88
|
||||
Height = 25
|
||||
Top = 8
|
||||
Width = 75
|
||||
Caption = 'Remove'
|
||||
Enabled = False
|
||||
OnClick = btnRemoveClick
|
||||
TabOrder = 2
|
||||
end
|
||||
object btnUp: TButton
|
||||
Left = 328
|
||||
Height = 25
|
||||
Top = 8
|
||||
Width = 75
|
||||
Caption = 'Up'
|
||||
Enabled = False
|
||||
OnClick = btnUpClick
|
||||
TabOrder = 3
|
||||
end
|
||||
object btnDown: TButton
|
||||
Left = 408
|
||||
Height = 25
|
||||
Top = 8
|
||||
Width = 75
|
||||
Caption = 'Down'
|
||||
Enabled = False
|
||||
OnClick = btnDownClick
|
||||
TabOrder = 4
|
||||
end
|
||||
object BCSVGViewerPreview: TBCSVGViewer
|
||||
Left = 328
|
||||
Height = 192
|
||||
Top = 40
|
||||
Width = 144
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
SVGString = '<?xml version="1.0" encoding="utf-8"?>'#10'<svg width="100%" xmlns="http://www.w3.org/2000/svg" height="100%"/>'#10
|
||||
DrawCheckers = True
|
||||
Color = clForm
|
||||
ColorOpacity = 128
|
||||
Caption = 'BCSVGViewerPreview'
|
||||
end
|
||||
object btnReplace: TButton
|
||||
Left = 168
|
||||
Height = 25
|
||||
Top = 8
|
||||
Width = 75
|
||||
Caption = 'Replace'
|
||||
Enabled = False
|
||||
OnClick = btnReplaceClick
|
||||
TabOrder = 5
|
||||
end
|
||||
object CheckBox_UseSVGAlignment: TCheckBox
|
||||
Left = 13
|
||||
Height = 23
|
||||
Top = 237
|
||||
Width = 239
|
||||
Anchors = [akLeft, akBottom]
|
||||
Caption = 'Use SVG alignment and aspect ratio'
|
||||
OnChange = CheckBox_UseSVGAlignmentChange
|
||||
TabOrder = 6
|
||||
end
|
||||
object ToolBar1: TToolBar
|
||||
Left = 323
|
||||
Height = 26
|
||||
Top = 232
|
||||
Width = 147
|
||||
Align = alNone
|
||||
Caption = 'ToolBar1'
|
||||
Images = ImageList1
|
||||
TabOrder = 7
|
||||
object ToolButton_AlignLeft: TToolButton
|
||||
Left = 1
|
||||
Top = 2
|
||||
Grouped = True
|
||||
ImageIndex = 0
|
||||
OnClick = ToolButton_AlignLeftClick
|
||||
end
|
||||
object ToolButton_AlignCenter: TToolButton
|
||||
Left = 24
|
||||
Top = 2
|
||||
Grouped = True
|
||||
ImageIndex = 1
|
||||
OnClick = ToolButton_AlignCenterClick
|
||||
end
|
||||
object ToolButton_AlignRight: TToolButton
|
||||
Left = 47
|
||||
Top = 2
|
||||
Caption = 'ToolButton_AlignRight'
|
||||
Grouped = True
|
||||
ImageIndex = 2
|
||||
OnClick = ToolButton_AlignRightClick
|
||||
end
|
||||
object ToolButton1: TToolButton
|
||||
Left = 70
|
||||
Height = 22
|
||||
Top = 2
|
||||
Caption = 'ToolButton_Divider'
|
||||
Style = tbsDivider
|
||||
end
|
||||
object ToolButton_AlignTop: TToolButton
|
||||
Left = 75
|
||||
Top = 2
|
||||
Grouped = True
|
||||
ImageIndex = 3
|
||||
OnClick = ToolButton_AlignTopClick
|
||||
end
|
||||
object ToolButton_AlignVCenter: TToolButton
|
||||
Left = 98
|
||||
Top = 2
|
||||
Grouped = True
|
||||
ImageIndex = 4
|
||||
OnClick = ToolButton_AlignVCenterClick
|
||||
end
|
||||
object ToolButton_AlignBottom: TToolButton
|
||||
Left = 121
|
||||
Top = 2
|
||||
Grouped = True
|
||||
ImageIndex = 5
|
||||
OnClick = ToolButton_AlignBottomClick
|
||||
end
|
||||
end
|
||||
object OpenDialog1: TOpenDialog
|
||||
Filter = 'SVG|*.svg'
|
||||
Left = 166
|
||||
Top = 76
|
||||
end
|
||||
object ImageList1: TImageList
|
||||
Scaled = True
|
||||
Left = 247
|
||||
Top = 140
|
||||
Bitmap = {
|
||||
4C69060000001000000010000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FFFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FFFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FFFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FFFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F00000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7F010000FF010000FF010000FF010000FF010000FF7B7B7BC6FFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7F0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FFFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7F010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FFFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7F010000FF010000FF010000FF010000FF010000FF7B7B7BC6FFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F00000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7F010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7F010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7F0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7F010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F00000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7F010000FF010000FF010000FF010000FF010000FF7B7B7BC6FFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7F0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FFFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F00000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7F010000FF010000FF010000FF010000FF010000FF7B7B7BC6FFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7F0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FFFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F00000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
000000000000000000000000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7F010000FF010000FF0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FF0100
|
||||
00FF010000FFFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7F010000FF010000FF010000FF010000FF010000FF7B7B7BC6FFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7F0100
|
||||
00FF010000FF010000FF010000FF010000FF010000FF010000FF010000FFFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F0000000000000000FFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFFFF7FFFFF
|
||||
FF7FFFFFFF7FFFFFFF7F00000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000
|
||||
}
|
||||
end
|
||||
end
|
||||
307
bgracontrols/bgrasvgimagelistform/bgrasvgimagelistform.pas
Normal file
307
bgracontrols/bgrasvgimagelistform/bgrasvgimagelistform.pas
Normal file
@@ -0,0 +1,307 @@
|
||||
unit bgrasvgimagelistform;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, BCSVGViewer,
|
||||
BGRASVGImageList, ComponentEditors, Types, Math, LCLType, ComCtrls;
|
||||
|
||||
type
|
||||
|
||||
{ TfrmBGRASVGImageListEditor }
|
||||
|
||||
TfrmBGRASVGImageListEditor = class(TForm)
|
||||
BCSVGViewerPreview: TBCSVGViewer;
|
||||
btnAdd: TButton;
|
||||
btnRemove: TButton;
|
||||
btnUp: TButton;
|
||||
btnDown: TButton;
|
||||
btnReplace: TButton;
|
||||
CheckBox_UseSVGAlignment: TCheckBox;
|
||||
ImageList1: TImageList;
|
||||
ListBox1: TListBox;
|
||||
OpenDialog1: TOpenDialog;
|
||||
ToolBar1: TToolBar;
|
||||
ToolButton1: TToolButton;
|
||||
ToolButton_AlignTop: TToolButton;
|
||||
ToolButton_AlignLeft: TToolButton;
|
||||
ToolButton_AlignCenter: TToolButton;
|
||||
ToolButton_AlignRight: TToolButton;
|
||||
ToolButton_AlignVCenter: TToolButton;
|
||||
ToolButton_AlignBottom: TToolButton;
|
||||
procedure btnAddClick(Sender: TObject);
|
||||
procedure btnDownClick(Sender: TObject);
|
||||
procedure btnRemoveClick(Sender: TObject);
|
||||
procedure btnReplaceClick(Sender: TObject);
|
||||
procedure btnUpClick(Sender: TObject);
|
||||
procedure CheckBox_UseSVGAlignmentChange(Sender: TObject);
|
||||
procedure ListBox1DrawItem(Control: TWinControl; Index: integer;
|
||||
ARect: TRect; State: TOwnerDrawState);
|
||||
procedure ListBox1SelectionChange(Sender: TObject; User: boolean);
|
||||
procedure ToolButton_AlignBottomClick(Sender: TObject);
|
||||
procedure ToolButton_AlignCenterClick(Sender: TObject);
|
||||
procedure ToolButton_AlignLeftClick(Sender: TObject);
|
||||
procedure ToolButton_AlignRightClick(Sender: TObject);
|
||||
procedure ToolButton_AlignTopClick(Sender: TObject);
|
||||
procedure ToolButton_AlignVCenterClick(Sender: TObject);
|
||||
private
|
||||
FComponent: TComponent;
|
||||
function GetImageList: TBGRASVGImageList;
|
||||
procedure UpdateListBox;
|
||||
procedure UpdateButtons;
|
||||
procedure UpdateToolButtonsAlign;
|
||||
public
|
||||
constructor {%H-}Create(AComponent: TComponent);
|
||||
property ImageList: TBGRASVGImageList read GetImageList;
|
||||
end;
|
||||
|
||||
{ TBGRASVGImageListEditor }
|
||||
|
||||
TBGRASVGImageListEditor = class(TComponentEditor)
|
||||
protected
|
||||
procedure DoShowEditor;
|
||||
public
|
||||
procedure ExecuteVerb(Index: integer); override;
|
||||
function GetVerb({%H-}Index: integer): string; override;
|
||||
function GetVerbCount: integer; override;
|
||||
end;
|
||||
|
||||
var
|
||||
frmBGRASVGImageListEditor: TfrmBGRASVGImageListEditor;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.lfm}
|
||||
|
||||
{ TBGRASVGImageListEditor }
|
||||
|
||||
procedure TBGRASVGImageListEditor.DoShowEditor;
|
||||
var
|
||||
f: TfrmBGRASVGImageListEditor;
|
||||
begin
|
||||
f := TfrmBGRASVGImageListEditor.Create(Component);
|
||||
try
|
||||
f.ShowModal;
|
||||
Modified;
|
||||
finally
|
||||
f.Free;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TBGRASVGImageListEditor.ExecuteVerb(Index: integer);
|
||||
begin
|
||||
case Index of
|
||||
0: DoShowEditor;
|
||||
end;
|
||||
end;
|
||||
|
||||
function TBGRASVGImageListEditor.GetVerb(Index: integer): string;
|
||||
begin
|
||||
Result := 'Assign style';
|
||||
end;
|
||||
|
||||
function TBGRASVGImageListEditor.GetVerbCount: integer;
|
||||
begin
|
||||
Result := 1;
|
||||
end;
|
||||
|
||||
{ TfrmBGRASVGImageListEditor }
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.btnAddClick(Sender: TObject);
|
||||
var
|
||||
s: TStringList;
|
||||
begin
|
||||
if OpenDialog1.Execute then
|
||||
begin
|
||||
s := TStringList.Create;
|
||||
try
|
||||
s.LoadFromFile(OpenDialog1.FileName);
|
||||
TBGRASVGImageList(FComponent).Add(s.Text);
|
||||
finally
|
||||
s.Free;
|
||||
UpdateListBox;
|
||||
ListBox1.ItemIndex := ListBox1.Count - 1;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.btnDownClick(Sender: TObject);
|
||||
begin
|
||||
TBGRASVGImageList(FComponent).Exchange(ListBox1.ItemIndex, ListBox1.ItemIndex + 1);
|
||||
UpdateListBox;
|
||||
ListBox1.ItemIndex := ListBox1.ItemIndex + 1;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.btnRemoveClick(Sender: TObject);
|
||||
begin
|
||||
TBGRASVGImageList(FComponent).Remove(ListBox1.ItemIndex);
|
||||
UpdateListBox;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.btnReplaceClick(Sender: TObject);
|
||||
var
|
||||
s: TStringList;
|
||||
begin
|
||||
if OpenDialog1.Execute then
|
||||
begin
|
||||
s := TStringList.Create;
|
||||
try
|
||||
s.LoadFromFile(OpenDialog1.FileName);
|
||||
TBGRASVGImageList(FComponent).Replace(ListBox1.ItemIndex, s.Text);
|
||||
finally
|
||||
s.Free;
|
||||
UpdateListBox;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.btnUpClick(Sender: TObject);
|
||||
begin
|
||||
TBGRASVGImageList(FComponent).Exchange(ListBox1.ItemIndex, ListBox1.ItemIndex - 1);
|
||||
UpdateListBox;
|
||||
ListBox1.ItemIndex := ListBox1.ItemIndex - 1;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.CheckBox_UseSVGAlignmentChange(
|
||||
Sender: TObject);
|
||||
begin
|
||||
ImageList.UseSVGAlignment:= CheckBox_UseSVGAlignment.Checked;
|
||||
BCSVGViewerPreview.UseSVGAlignment:= ImageList.UseSVGAlignment;
|
||||
ListBox1.Invalidate;
|
||||
UpdateToolButtonsAlign;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ListBox1DrawItem(Control: TWinControl;
|
||||
Index: integer; ARect: TRect; State: TOwnerDrawState);
|
||||
begin
|
||||
ListBox1.Canvas.Brush.Color := clWhite;
|
||||
if (odSelected in State) then
|
||||
ListBox1.Canvas.Brush.Color := clHighlight;
|
||||
ListBox1.Canvas.FillRect(ARect);
|
||||
ListBox1.Canvas.TextOut(ARect.Height + ScaleX(4, 96),
|
||||
ARect.Top, Index.ToString);
|
||||
if (Index <> -1) then
|
||||
TBGRASVGImageList(FComponent).Draw(Index, ListBox1, ListBox1.Canvas,
|
||||
ARect.Left, ARect.Top, ARect.Height, ARect.Height);
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ListBox1SelectionChange(Sender: TObject;
|
||||
User: boolean);
|
||||
begin
|
||||
UpdateButtons;
|
||||
if ListBox1.ItemIndex <> -1 then
|
||||
BCSVGViewerPreview.SVGString :=
|
||||
TBGRASVGImageList(FComponent).SVGString[ListBox1.ItemIndex];
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ToolButton_AlignBottomClick(Sender: TObject
|
||||
);
|
||||
begin
|
||||
ImageList.VerticalAlignment:= tlBottom;
|
||||
BCSVGViewerPreview.VertAlign:= ImageList.VerticalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
ListBox1.Invalidate;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ToolButton_AlignCenterClick(Sender: TObject
|
||||
);
|
||||
begin
|
||||
ImageList.HorizontalAlignment:= taCenter;
|
||||
BCSVGViewerPreview.HorizAlign:= ImageList.HorizontalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
ListBox1.Invalidate;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ToolButton_AlignLeftClick(Sender: TObject);
|
||||
begin
|
||||
ImageList.HorizontalAlignment:= taLeftJustify;
|
||||
BCSVGViewerPreview.HorizAlign:= ImageList.HorizontalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
ListBox1.Invalidate;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ToolButton_AlignRightClick(Sender: TObject
|
||||
);
|
||||
begin
|
||||
ImageList.HorizontalAlignment:= taRightJustify;
|
||||
BCSVGViewerPreview.HorizAlign:= ImageList.HorizontalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
ListBox1.Invalidate;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ToolButton_AlignTopClick(Sender: TObject);
|
||||
begin
|
||||
ImageList.VerticalAlignment:= tlTop;
|
||||
BCSVGViewerPreview.VertAlign:= ImageList.VerticalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
ListBox1.Invalidate;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.ToolButton_AlignVCenterClick(
|
||||
Sender: TObject);
|
||||
begin
|
||||
ImageList.VerticalAlignment:= tlCenter;
|
||||
BCSVGViewerPreview.VertAlign:= ImageList.VerticalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
ListBox1.Invalidate;
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.UpdateListBox;
|
||||
var
|
||||
i: integer;
|
||||
index: integer;
|
||||
begin
|
||||
index := ListBox1.ItemIndex;
|
||||
ListBox1.Clear;
|
||||
for i := 0 to TBGRASVGImageList(FComponent).Count - 1 do
|
||||
ListBox1.Items.Add('Image' + i.ToString);
|
||||
if ListBox1.Count > 0 then
|
||||
ListBox1.ItemIndex := index;
|
||||
UpdateButtons;
|
||||
end;
|
||||
|
||||
function TfrmBGRASVGImageListEditor.GetImageList: TBGRASVGImageList;
|
||||
begin
|
||||
result := TBGRASVGImageList(FComponent);
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.UpdateButtons;
|
||||
begin
|
||||
btnUp.Enabled := (ListBox1.Count > 1) and (ListBox1.ItemIndex > 0);
|
||||
btnDown.Enabled := (ListBox1.Count > 1) and (ListBox1.ItemIndex < ListBox1.Count - 1);
|
||||
btnRemove.Enabled := (ListBox1.Count > 0) and (ListBox1.ItemIndex <> -1);
|
||||
btnReplace.Enabled := (ListBox1.Count > 0) and (ListBox1.ItemIndex <> -1);
|
||||
end;
|
||||
|
||||
procedure TfrmBGRASVGImageListEditor.UpdateToolButtonsAlign;
|
||||
begin
|
||||
ToolButton_AlignLeft.Down := (ImageList.HorizontalAlignment = taLeftJustify);
|
||||
ToolButton_AlignCenter.Down := (ImageList.HorizontalAlignment = taCenter);
|
||||
ToolButton_AlignRight.Down := (ImageList.HorizontalAlignment = taRightJustify);
|
||||
ToolButton_AlignTop.Down := (ImageList.VerticalAlignment = tlTop);
|
||||
ToolButton_AlignVCenter.Down := (ImageList.VerticalAlignment = tlCenter);
|
||||
ToolButton_AlignBottom.Down := (ImageList.VerticalAlignment = tlBottom);
|
||||
ToolBar1.Enabled:= not ImageList.UseSVGAlignment;
|
||||
end;
|
||||
|
||||
constructor TfrmBGRASVGImageListEditor.Create(AComponent: TComponent);
|
||||
begin
|
||||
inherited Create(Application);
|
||||
|
||||
FComponent := AComponent;
|
||||
ListBox1.ItemHeight := Max(ImageList.Height,
|
||||
Max(16, ListBox1.Canvas.TextHeight('0')));
|
||||
UpdateListBox;
|
||||
CheckBox_UseSVGAlignment.Checked := ImageList.UseSVGAlignment;
|
||||
BCSVGViewerPreview.UseSVGAlignment:= ImageList.UseSVGAlignment;
|
||||
BCSVGViewerPreview.HorizAlign:= ImageList.HorizontalAlignment;
|
||||
BCSVGViewerPreview.VertAlign:= ImageList.VerticalAlignment;
|
||||
UpdateToolButtonsAlign;
|
||||
end;
|
||||
|
||||
initialization
|
||||
RegisterComponentEditor(TBGRASVGImageList, TBGRASVGImageListEditor);
|
||||
|
||||
end.
|
||||
BIN
bgracontrols/bgrasvgimagelistform/bgrasvgimagelistproject.ico
Normal file
BIN
bgracontrols/bgrasvgimagelistform/bgrasvgimagelistproject.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 134 KiB |
@@ -0,0 +1,86 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CONFIG>
|
||||
<ProjectOptions>
|
||||
<Version Value="12"/>
|
||||
<PathDelim Value="\"/>
|
||||
<General>
|
||||
<Flags>
|
||||
<CompatibilityMode Value="True"/>
|
||||
</Flags>
|
||||
<SessionStorage Value="InProjectDir"/>
|
||||
<Title Value="bgrasvgimagelistproject"/>
|
||||
<Scaled Value="True"/>
|
||||
<ResourceType Value="res"/>
|
||||
<UseXPManifest Value="True"/>
|
||||
<XPManifest>
|
||||
<DpiAware Value="True"/>
|
||||
</XPManifest>
|
||||
<Icon Value="0"/>
|
||||
</General>
|
||||
<BuildModes Count="1">
|
||||
<Item1 Name="Default" Default="True"/>
|
||||
</BuildModes>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
<UseFileFilters Value="True"/>
|
||||
</PublishOptions>
|
||||
<RunParams>
|
||||
<FormatVersion Value="2"/>
|
||||
</RunParams>
|
||||
<RequiredPackages Count="2">
|
||||
<Item1>
|
||||
<PackageName Value="bgracontrols"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<PackageName Value="LCL"/>
|
||||
</Item2>
|
||||
</RequiredPackages>
|
||||
<Units Count="2">
|
||||
<Unit0>
|
||||
<Filename Value="bgrasvgimagelistproject.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<Filename Value="bgrasvgimagelistform.pas"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<ComponentName Value="frmBGRASVGImageListEditor"/>
|
||||
<HasResources Value="True"/>
|
||||
<ResourceBaseClass Value="Form"/>
|
||||
</Unit1>
|
||||
</Units>
|
||||
</ProjectOptions>
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<PathDelim Value="\"/>
|
||||
<Target>
|
||||
<Filename Value="bgrasvgimagelistproject"/>
|
||||
</Target>
|
||||
<SearchPaths>
|
||||
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||
</SearchPaths>
|
||||
<Linking>
|
||||
<Debugging>
|
||||
<DebugInfoType Value="dsDwarf2Set"/>
|
||||
</Debugging>
|
||||
<Options>
|
||||
<Win32>
|
||||
<GraphicApplication Value="True"/>
|
||||
</Win32>
|
||||
</Options>
|
||||
</Linking>
|
||||
</CompilerOptions>
|
||||
<Debugging>
|
||||
<Exceptions Count="3">
|
||||
<Item1>
|
||||
<Name Value="EAbort"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Name Value="ECodetoolError"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Name Value="EFOpenError"/>
|
||||
</Item3>
|
||||
</Exceptions>
|
||||
</Debugging>
|
||||
</CONFIG>
|
||||
@@ -0,0 +1,22 @@
|
||||
program bgrasvgimagelistproject;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
uses
|
||||
{$IFDEF UNIX}{$IFDEF UseCThreads}
|
||||
cthreads,
|
||||
{$ENDIF}{$ENDIF}
|
||||
Interfaces, // this includes the LCL widgetset
|
||||
Forms, bgrasvgimagelistform
|
||||
{ you can add units after this };
|
||||
|
||||
{$R *.res}
|
||||
|
||||
begin
|
||||
RequireDerivedFormResource:=True;
|
||||
Application.Scaled:=True;
|
||||
Application.Initialize;
|
||||
Application.CreateForm(TfrmBGRASVGImageListEditor, frmBGRASVGImageListEditor);
|
||||
Application.Run;
|
||||
end.
|
||||
|
||||
Reference in New Issue
Block a user