forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix, problem with btns glyph with gtk2

This commit is contained in:
Basile Burg 2015-08-24 11:49:53 +02:00
parent 0bbbebd061
commit 8ddad1cbc3
8 changed files with 106 additions and 117 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
src/ce_libmaneditor.lfm
View File

@ -1,7 +1,7 @@
inherited CELibManEditorWidget: TCELibManEditorWidget inherited CELibManEditorWidget: TCELibManEditorWidget
Left = 699 Left = 698
Height = 349 Height = 349
Top = 362 Top = 336
Width = 466 Width = 466
Caption = 'Library manager' Caption = 'Library manager'
ClientHeight = 349 ClientHeight = 349
@ -18,18 +18,18 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
ClientWidth = 466 ClientWidth = 466
object Panel1: TPanel[0] object Panel1: TPanel[0]
Left = 4 Left = 4
Height = 24 Height = 26
Top = 4 Top = 4
Width = 458 Width = 458
Align = alTop Align = alTop
BorderSpacing.Around = 4 BorderSpacing.Around = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 24 ClientHeight = 26
ClientWidth = 458 ClientWidth = 458
TabOrder = 0 TabOrder = 0
object btnAddLib: TBitBtn object btnAddLib: TBitBtn
Left = 0 Left = 0
Height = 24 Height = 26
Hint = 'add library alias' Hint = 'add library alias'
Top = 0 Top = 0
Width = 28 Width = 28
@ -40,7 +40,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnRemLib: TBitBtn object btnRemLib: TBitBtn
Left = 28 Left = 28
Height = 24 Height = 26
Hint = 'remove library alias' Hint = 'remove library alias'
Top = 0 Top = 0
Width = 28 Width = 28
@ -51,7 +51,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnSelFile: TBitBtn object btnSelFile: TBitBtn
Left = 374 Left = 374
Height = 24 Height = 26
Hint = 'select the library file' Hint = 'select the library file'
Top = 0 Top = 0
Width = 28 Width = 28
@ -62,7 +62,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnSelRoot: TBitBtn object btnSelRoot: TBitBtn
Left = 430 Left = 430
Height = 24 Height = 26
Hint = 'select the sources root' Hint = 'select the sources root'
Top = 0 Top = 0
Width = 28 Width = 28
@ -73,7 +73,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnEditAlias: TBitBtn object btnEditAlias: TBitBtn
Left = 346 Left = 346
Height = 24 Height = 26
Hint = 'edit the library alias' Hint = 'edit the library alias'
Top = 0 Top = 0
Width = 28 Width = 28
@ -84,7 +84,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnMoveDown: TBitBtn object btnMoveDown: TBitBtn
Left = 56 Left = 56
Height = 24 Height = 26
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
@ -94,7 +94,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnMoveUp: TBitBtn object btnMoveUp: TBitBtn
Left = 84 Left = 84
Height = 24 Height = 26
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
@ -104,7 +104,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnSelfoldOfFiles: TBitBtn object btnSelfoldOfFiles: TBitBtn
Left = 402 Left = 402
Height = 24 Height = 26
Hint = 'select a folder of library files' Hint = 'select a folder of library files'
Top = 0 Top = 0
Width = 28 Width = 28
@ -115,7 +115,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object btnReg: TBitBtn object btnReg: TBitBtn
Left = 112 Left = 112
Height = 24 Height = 26
Hint = 'register from the current project' Hint = 'register from the current project'
Top = 0 Top = 0
Width = 28 Width = 28
@ -127,8 +127,8 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
end end
object List: TListView[1] object List: TListView[1]
Left = 4 Left = 4
Height = 313 Height = 311
Top = 32 Top = 34
Width = 458 Width = 458
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
@ -136,7 +136,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
item item
AutoSize = True AutoSize = True
Caption = 'Alias' Caption = 'Alias'
Width = 454 Width = 35
end end
item item
AutoSize = True AutoSize = True
@ -146,7 +146,7 @@ inherited CELibManEditorWidget: TCELibManEditorWidget
item item
AutoSize = True AutoSize = True
Caption = 'Sources root' Caption = 'Sources root'
Width = 78 Width = 340
end> end>
GridLines = True GridLines = True
HideSelection = False HideSelection = False

31
src/ce_miniexplorer.lfm
View File

@ -1,7 +1,7 @@
inherited CEMiniExplorerWidget: TCEMiniExplorerWidget inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
Left = 1063 Left = 1062
Height = 598 Height = 598
Top = 30 Top = 4
Width = 343 Width = 343
Caption = 'Mini explorer' Caption = 'Mini explorer'
ClientHeight = 598 ClientHeight = 598
@ -28,7 +28,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
AutoWidthLastColumn = True AutoWidthLastColumn = True
Columns = < Columns = <
item item
Width = 331 Width = 319
end> end>
ReadOnly = True ReadOnly = True
ShowColumnHeaders = False ShowColumnHeaders = False
@ -58,10 +58,9 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
object Tree: TTreeView object Tree: TTreeView
Left = 0 Left = 0
Height = 171 Height = 171
Top = 28 Top = 32
Width = 335 Width = 335
Align = alTop Align = alTop
DefaultItemHeight = 18
Images = imgList Images = imgList
ReadOnly = True ReadOnly = True
ScrollBars = ssAutoBoth ScrollBars = ssAutoBoth
@ -72,22 +71,22 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
Cursor = crVSplit Cursor = crVSplit
Left = 0 Left = 0
Height = 6 Height = 6
Top = 199 Top = 203
Width = 335 Width = 335
Align = alTop Align = alTop
ResizeAnchor = akTop ResizeAnchor = akTop
end end
object lstFiles: TListView object lstFiles: TListView
Left = 0 Left = 0
Height = 248 Height = 244
Top = 205 Top = 209
Width = 335 Width = 335
Align = alClient Align = alClient
AutoSort = False AutoSort = False
AutoWidthLastColumn = True AutoWidthLastColumn = True
Columns = < Columns = <
item item
Width = 331 Width = 319
end> end>
ReadOnly = True ReadOnly = True
ShowColumnHeaders = False ShowColumnHeaders = False
@ -98,19 +97,19 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
end end
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 0
Height = 24 Height = 28
Top = 0 Top = 0
Width = 335 Width = 335
Align = alTop Align = alTop
BorderSpacing.Bottom = 4 BorderSpacing.Bottom = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 24 ClientHeight = 28
ClientWidth = 335 ClientWidth = 335
TabOrder = 3 TabOrder = 3
OnClick = Panel1Click OnClick = Panel1Click
object btnAddFav: TBitBtn object btnAddFav: TBitBtn
Left = 0 Left = 0
Height = 24 Height = 28
Hint = 'add selected folder to favorites' Hint = 'add selected folder to favorites'
Top = 0 Top = 0
Width = 28 Width = 28
@ -120,7 +119,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
end end
object btnEdit: TBitBtn object btnEdit: TBitBtn
Left = 84 Left = 84
Height = 24 Height = 28
Hint = 'open selected file in a Coedit-or' Hint = 'open selected file in a Coedit-or'
Top = 0 Top = 0
Width = 28 Width = 28
@ -130,7 +129,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
end end
object btnShellOpen: TBitBtn object btnShellOpen: TBitBtn
Left = 56 Left = 56
Height = 24 Height = 28
Hint = 'open the selected file with the shell' Hint = 'open the selected file with the shell'
Top = 0 Top = 0
Width = 28 Width = 28
@ -140,7 +139,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
end end
object btnRemFav: TBitBtn object btnRemFav: TBitBtn
Left = 28 Left = 28
Height = 24 Height = 28
Hint = 'remove selected folder from the favorites' Hint = 'remove selected folder from the favorites'
Top = 0 Top = 0
Width = 28 Width = 28
@ -150,7 +149,7 @@ inherited CEMiniExplorerWidget: TCEMiniExplorerWidget
end end
object lstFilter: TListFilterEdit object lstFilter: TListFilterEdit
Left = 113 Left = 113
Height = 22 Height = 26
Top = 1 Top = 1
Width = 221 Width = 221
ButtonWidth = 28 ButtonWidth = 28

33
src/ce_projconf.lfm
View File

@ -1,7 +1,7 @@
inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
Left = 632 Left = 631
Height = 273 Height = 273
Top = 322 Top = 296
Width = 445 Width = 445
Caption = 'Project configuration' Caption = 'Project configuration'
ClientHeight = 273 ClientHeight = 273
@ -18,7 +18,7 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
ClientWidth = 445 ClientWidth = 445
object pnlToolBar: TPanel[0] object pnlToolBar: TPanel[0]
Left = 4 Left = 4
Height = 24 Height = 26
Top = 2 Top = 2
Width = 437 Width = 437
Align = alTop Align = alTop
@ -26,26 +26,26 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
BorderSpacing.Right = 2 BorderSpacing.Right = 2
BorderSpacing.Around = 2 BorderSpacing.Around = 2
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 24 ClientHeight = 26
ClientWidth = 437 ClientWidth = 437
TabOrder = 0 TabOrder = 0
object selConf: TComboBox object selConf: TComboBox
Left = 0 Left = 0
Height = 23 Height = 25
Hint = 'select a configuration' Hint = 'select a configuration'
Top = 1 Top = 1
Width = 324 Width = 324
Align = alClient Align = alClient
BorderSpacing.Top = 1 BorderSpacing.Top = 1
BorderSpacing.Right = 1 BorderSpacing.Right = 1
ItemHeight = 15 ItemHeight = 0
OnChange = selConfChange OnChange = selConfChange
Style = csDropDownList Style = csDropDownList
TabOrder = 0 TabOrder = 0
end end
object btnAddConf: TSpeedButton object btnAddConf: TSpeedButton
Left = 325 Left = 325
Height = 24 Height = 26
Hint = 'add an empty configuration' Hint = 'add an empty configuration'
Top = 0 Top = 0
Width = 28 Width = 28
@ -55,7 +55,7 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
end end
object btnDelConf: TSpeedButton object btnDelConf: TSpeedButton
Left = 353 Left = 353
Height = 24 Height = 26
Hint = 'remove selected configuration' Hint = 'remove selected configuration'
Top = 0 Top = 0
Width = 28 Width = 28
@ -65,7 +65,7 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
end end
object btnCloneConf: TSpeedButton object btnCloneConf: TSpeedButton
Left = 381 Left = 381
Height = 24 Height = 26
Hint = 'clone selected configuration' Hint = 'clone selected configuration'
Top = 0 Top = 0
Width = 28 Width = 28
@ -75,7 +75,7 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
end end
object btnSyncEdit: TSpeedButton object btnSyncEdit: TSpeedButton
Left = 409 Left = 409
Height = 24 Height = 26
Hint = 'syncrhonize each configuration' Hint = 'syncrhonize each configuration'
Top = 0 Top = 0
Width = 28 Width = 28
@ -86,24 +86,23 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
end end
object Panel2: TPanel[1] object Panel2: TPanel[1]
Left = 4 Left = 4
Height = 239 Height = 237
Top = 30 Top = 32
Width = 437 Width = 437
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 239 ClientHeight = 237
ClientWidth = 437 ClientWidth = 437
TabOrder = 1 TabOrder = 1
object Tree: TTreeView object Tree: TTreeView
Left = 0 Left = 0
Height = 239 Height = 237
Hint = 'filter configuration elements' Hint = 'filter configuration elements'
Top = 0 Top = 0
Width = 160 Width = 160
Align = alLeft Align = alLeft
AutoExpand = True AutoExpand = True
DefaultItemHeight = 18
HideSelection = False HideSelection = False
ReadOnly = True ReadOnly = True
ScrollBars = ssAutoBoth ScrollBars = ssAutoBoth
@ -132,14 +131,14 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
end end
object Splitter1: TSplitter object Splitter1: TSplitter
Left = 160 Left = 160
Height = 239 Height = 237
Top = 0 Top = 0
Width = 5 Width = 5
AutoSnap = False AutoSnap = False
end end
object inspector: TTIPropertyGrid object inspector: TTIPropertyGrid
Left = 165 Left = 165
Height = 239 Height = 237
Top = 0 Top = 0
Width = 272 Width = 272
Align = alClient Align = alClient

25
src/ce_projinspect.lfm
View File

@ -1,7 +1,7 @@
inherited CEProjectInspectWidget: TCEProjectInspectWidget inherited CEProjectInspectWidget: TCEProjectInspectWidget
Left = 1390 Left = 1563
Height = 258 Height = 258
Top = 26 Top = 8
Width = 341 Width = 341
AllowDropFiles = True AllowDropFiles = True
Caption = 'Project inspector' Caption = 'Project inspector'
@ -21,13 +21,12 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
PopupMenu = nil PopupMenu = nil
object Tree: TTreeView[0] object Tree: TTreeView[0]
Left = 2 Left = 2
Height = 228 Height = 226
Top = 28 Top = 30
Width = 337 Width = 337
Align = alClient Align = alClient
AutoExpand = True AutoExpand = True
BorderSpacing.Around = 2 BorderSpacing.Around = 2
DefaultItemHeight = 18
Images = imgList Images = imgList
ReadOnly = True ReadOnly = True
RightClickSelect = True RightClickSelect = True
@ -50,18 +49,18 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
end end
object pnlToolBar: TPanel[1] object pnlToolBar: TPanel[1]
Left = 2 Left = 2
Height = 24 Height = 26
Top = 2 Top = 2
Width = 337 Width = 337
Align = alTop Align = alTop
BorderSpacing.Around = 2 BorderSpacing.Around = 2
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 24 ClientHeight = 26
ClientWidth = 337 ClientWidth = 337
TabOrder = 1 TabOrder = 1
object btnAddFile: TSpeedButton object btnAddFile: TSpeedButton
Left = 0 Left = 0
Height = 24 Height = 26
Hint = 'add a source file to the project' Hint = 'add a source file to the project'
Top = 0 Top = 0
Width = 28 Width = 28
@ -71,7 +70,7 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
end end
object btnProjOpts: TSpeedButton object btnProjOpts: TSpeedButton
Left = 112 Left = 112
Height = 24 Height = 26
Top = 0 Top = 0
Width = 28 Width = 28
Action = CEMainForm.actProjOpts Action = CEMainForm.actProjOpts
@ -80,7 +79,7 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
end end
object btnAddFold: TSpeedButton object btnAddFold: TSpeedButton
Left = 56 Left = 56
Height = 24 Height = 26
Hint = 'add a folder of source to the project' Hint = 'add a folder of source to the project'
Top = 0 Top = 0
Width = 28 Width = 28
@ -90,7 +89,7 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
end end
object TreeFilterEdit1: TTreeFilterEdit object TreeFilterEdit1: TTreeFilterEdit
Left = 142 Left = 142
Height = 20 Height = 22
Top = 2 Top = 2
Width = 193 Width = 193
ButtonWidth = 28 ButtonWidth = 28
@ -105,7 +104,7 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
end end
object btnRemFile: TSpeedButton object btnRemFile: TSpeedButton
Left = 28 Left = 28
Height = 24 Height = 26
Hint = 'remove selected sources file(s) from the project' Hint = 'remove selected sources file(s) from the project'
Top = 0 Top = 0
Width = 28 Width = 28
@ -114,7 +113,7 @@ inherited CEProjectInspectWidget: TCEProjectInspectWidget
end end
object btnRemFold: TSpeedButton object btnRemFold: TSpeedButton
Left = 84 Left = 84
Height = 24 Height = 26
Hint = 'remove a folder of source from the project' Hint = 'remove a folder of source from the project'
Top = 0 Top = 0
Width = 28 Width = 28

17
src/ce_symlist.lfm
View File

@ -1,7 +1,7 @@
inherited CESymbolListWidget: TCESymbolListWidget inherited CESymbolListWidget: TCESymbolListWidget
Left = 985 Left = 984
Height = 430 Height = 430
Top = 215 Top = 189
Width = 310 Width = 310
Caption = 'Symbol list' Caption = 'Symbol list'
ClientHeight = 430 ClientHeight = 430
@ -19,12 +19,11 @@ inherited CESymbolListWidget: TCESymbolListWidget
PopupMenu = nil PopupMenu = nil
object Tree: TTreeView[0] object Tree: TTreeView[0]
Left = 4 Left = 4
Height = 394 Height = 390
Top = 32 Top = 36
Width = 302 Width = 302
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
DefaultItemHeight = 18
HideSelection = False HideSelection = False
Images = imgList Images = imgList
ReadOnly = True ReadOnly = True
@ -57,19 +56,19 @@ inherited CESymbolListWidget: TCESymbolListWidget
end end
object Panel1: TPanel[1] object Panel1: TPanel[1]
Left = 2 Left = 2
Height = 26 Height = 30
Top = 2 Top = 2
Width = 306 Width = 306
Align = alTop Align = alTop
BorderSpacing.Around = 2 BorderSpacing.Around = 2
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 26 ClientHeight = 30
ClientWidth = 306 ClientWidth = 306
PopupMenu = contextMenu PopupMenu = contextMenu
TabOrder = 1 TabOrder = 1
object TreeFilterEdit1: TTreeFilterEdit object TreeFilterEdit1: TTreeFilterEdit
Left = 32 Left = 32
Height = 22 Height = 26
Top = 2 Top = 2
Width = 272 Width = 272
OnAfterFilter = TreeFilterEdit1AfterFilter OnAfterFilter = TreeFilterEdit1AfterFilter
@ -86,7 +85,7 @@ inherited CESymbolListWidget: TCESymbolListWidget
end end
object btnRefresh: TBitBtn object btnRefresh: TBitBtn
Left = 2 Left = 2
Height = 22 Height = 26
Hint = 'refresh the list' Hint = 'refresh the list'
Top = 2 Top = 2
Width = 28 Width = 28

33
src/ce_todolist.lfm
View File

@ -1,7 +1,7 @@
inherited CETodoListWidget: TCETodoListWidget inherited CETodoListWidget: TCETodoListWidget
Left = 631 Left = 630
Height = 337 Height = 337
Top = 222 Top = 196
Width = 584 Width = 584
Caption = 'Todo list' Caption = 'Todo list'
ClientHeight = 337 ClientHeight = 337
@ -18,19 +18,19 @@ inherited CETodoListWidget: TCETodoListWidget
ClientWidth = 584 ClientWidth = 584
object Panel1: TPanel[0] object Panel1: TPanel[0]
Left = 2 Left = 2
Height = 28 Height = 30
Top = 2 Top = 2
Width = 580 Width = 580
Align = alTop Align = alTop
BorderSpacing.Around = 2 BorderSpacing.Around = 2
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 28 ClientHeight = 30
ClientWidth = 580 ClientWidth = 580
PopupMenu = contextMenu PopupMenu = contextMenu
TabOrder = 0 TabOrder = 0
object btnRefresh: TBitBtn object btnRefresh: TBitBtn
Left = 2 Left = 2
Height = 24 Height = 26
Hint = 'refresh the list' Hint = 'refresh the list'
Top = 2 Top = 2
Width = 28 Width = 28
@ -42,7 +42,7 @@ inherited CETodoListWidget: TCETodoListWidget
end end
object lstfilter: TListFilterEdit object lstfilter: TListFilterEdit
Left = 62 Left = 62
Height = 24 Height = 26
Top = 2 Top = 2
Width = 516 Width = 516
ButtonWidth = 28 ButtonWidth = 28
@ -55,7 +55,7 @@ inherited CETodoListWidget: TCETodoListWidget
end end
object btnGo: TBitBtn object btnGo: TBitBtn
Left = 32 Left = 32
Height = 24 Height = 26
Hint = 'refresh the list' Hint = 'refresh the list'
Top = 2 Top = 2
Width = 28 Width = 28
@ -68,8 +68,8 @@ inherited CETodoListWidget: TCETodoListWidget
end end
object lstItems: TListView[1] object lstItems: TListView[1]
Left = 4 Left = 4
Height = 299 Height = 297
Top = 34 Top = 36
Width = 576 Width = 576
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
@ -77,26 +77,27 @@ inherited CETodoListWidget: TCETodoListWidget
item item
AutoSize = True AutoSize = True
Caption = 'text' Caption = 'text'
Width = 572 Width = 29
end end
item item
AutoSize = True AutoSize = True
Caption = 'category' Caption = 'category'
Width = 58
end
item
AutoSize = True
Caption = 'assignee'
Width = 57 Width = 57
end end
item
AutoSize = True
Caption = 'assignee'
Width = 58
end
item item
AutoSize = True AutoSize = True
Caption = 'status' Caption = 'status'
Width = 43 Width = 42
end end
item item
AutoSize = True AutoSize = True
Caption = 'priority' Caption = 'priority'
Width = 374
end> end>
ReadOnly = True ReadOnly = True
SortType = stText SortType = stText

44
src/ce_toolseditor.lfm
View File

@ -1,7 +1,7 @@
inherited CEToolsEditorWidget: TCEToolsEditorWidget inherited CEToolsEditorWidget: TCEToolsEditorWidget
Left = 1143 Left = 1560
Height = 280 Height = 280
Top = 343 Top = 303
Width = 441 Width = 441
Caption = 'Tools editor' Caption = 'Tools editor'
ClientHeight = 280 ClientHeight = 280
@ -18,42 +18,38 @@ inherited CEToolsEditorWidget: TCEToolsEditorWidget
ClientWidth = 441 ClientWidth = 441
object Panel1: TPanel[0] object Panel1: TPanel[0]
Left = 4 Left = 4
Height = 24 Height = 26
Top = 4 Top = 4
Width = 433 Width = 433
Align = alTop Align = alTop
BorderSpacing.Around = 4 BorderSpacing.Around = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 24 ClientHeight = 26
ClientWidth = 433 ClientWidth = 433
TabOrder = 0 TabOrder = 0
object BtnAddTool: TBitBtn object BtnAddTool: TBitBtn
Left = 0 Left = 0
Height = 24 Height = 26
Hint = 'add a tool' Hint = 'add a tool'
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
Layout = blGlyphBottom
OnClick = BtnAddToolClick OnClick = BtnAddToolClick
Spacing = 0
TabOrder = 0 TabOrder = 0
end end
object btnRemTool: TBitBtn object btnRemTool: TBitBtn
Left = 28 Left = 28
Height = 24 Height = 26
Hint = 'remove selected tool' Hint = 'remove selected tool'
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
Layout = blGlyphBottom
OnClick = btnRemToolClick OnClick = btnRemToolClick
Spacing = 0
TabOrder = 1 TabOrder = 1
end end
object btnRun: TBitBtn object btnRun: TBitBtn
Left = 405 Left = 405
Height = 24 Height = 26
Hint = 'execute selected tool' Hint = 'execute selected tool'
Top = 0 Top = 0
Width = 28 Width = 28
@ -65,73 +61,69 @@ inherited CEToolsEditorWidget: TCEToolsEditorWidget
end end
object btnMoveDown: TBitBtn object btnMoveDown: TBitBtn
Left = 56 Left = 56
Height = 24 Height = 26
Hint = 'move selected tool down' Hint = 'move selected tool down'
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
Layout = blGlyphBottom
OnClick = btnMoveDownClick OnClick = btnMoveDownClick
Spacing = 0
TabOrder = 3 TabOrder = 3
end end
object btnMoveUp: TBitBtn object btnMoveUp: TBitBtn
Left = 84 Left = 84
Height = 24 Height = 26
Hint = 'move selected tool up' Hint = 'move selected tool up'
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
Layout = blGlyphBottom
OnClick = btnMoveUpClick OnClick = btnMoveUpClick
Spacing = 0
TabOrder = 4 TabOrder = 4
end end
object btnClone: TBitBtn object btnClone: TBitBtn
Left = 112 Left = 112
Height = 24 Height = 26
Hint = 'clone selected tool' Hint = 'clone selected tool'
Top = 0 Top = 0
Width = 28 Width = 28
Align = alLeft Align = alLeft
Layout = blGlyphBottom
OnClick = btnCloneClick OnClick = btnCloneClick
Spacing = 0
TabOrder = 5 TabOrder = 5
end end
end end
object Panel2: TPanel[1] object Panel2: TPanel[1]
Left = 4 Left = 4
Height = 244 Height = 242
Top = 32 Top = 34
Width = 433 Width = 433
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
BevelOuter = bvNone BevelOuter = bvNone
ClientHeight = 244 ClientHeight = 242
ClientWidth = 433 ClientWidth = 433
TabOrder = 1 TabOrder = 1
object lstTools: TListBox object lstTools: TListBox
Left = 0 Left = 0
Height = 244 Height = 242
Top = 0 Top = 0
Width = 160 Width = 160
Align = alLeft Align = alLeft
ItemHeight = 0 ItemHeight = 0
OnDblClick = lstToolsDblClick OnDblClick = lstToolsDblClick
OnSelectionChange = lstToolsSelectionChange OnSelectionChange = lstToolsSelectionChange
ScrollWidth = 158
TabOrder = 0 TabOrder = 0
TopIndex = -1
end end
object Splitter1: TSplitter object Splitter1: TSplitter
Left = 160 Left = 160
Height = 244 Height = 242
Top = 0 Top = 0
Width = 5 Width = 5
AutoSnap = False AutoSnap = False
end end
object propsEd: TTIPropertyGrid object propsEd: TTIPropertyGrid
Left = 165 Left = 165
Height = 244 Height = 242
Top = 0 Top = 0
Width = 268 Width = 268
Align = alClient Align = alClient

6
src/ce_widget.lfm
View File

@ -1,7 +1,7 @@
object CEWidget: TCEWidget object CEWidget: TCEWidget
Left = 1159 Left = 1158
Height = 121 Height = 121
Top = 91 Top = 65
Width = 332 Width = 332
BorderIcons = [biMinimize, biMaximize] BorderIcons = [biMinimize, biMaximize]
Caption = 'CEWidget' Caption = 'CEWidget'
@ -9,7 +9,7 @@ object CEWidget: TCEWidget
ClientWidth = 332 ClientWidth = 332
ShowHint = True ShowHint = True
ShowInTaskBar = stNever ShowInTaskBar = stNever
LCLVersion = '1.4.0.4' LCLVersion = '1.4.2.0'
object Back: TPanel object Back: TPanel
Left = 0 Left = 0
Height = 121 Height = 121