added ddemangle to to tool infos

This commit is contained in:
Basile Burg 2015-09-14 15:54:41 +02:00
parent 1254f45ecd
commit d1368d3939
2 changed files with 24 additions and 21 deletions

View File

@ -1,38 +1,38 @@
inherited CEInfoWidget: TCEInfoWidget inherited CEInfoWidget: TCEInfoWidget
Left = 713 Left = 713
Height = 318 Height = 378
Top = 245 Top = 245
Width = 378 Width = 389
BorderIcons = [biSystemMenu, biMinimize, biMaximize] BorderIcons = [biSystemMenu, biMinimize, biMaximize]
Caption = 'About' Caption = 'About'
ClientHeight = 318 ClientHeight = 378
ClientWidth = 378 ClientWidth = 389
inherited Back: TPanel inherited Back: TPanel
Height = 318 Height = 378
Width = 378 Width = 389
ClientHeight = 318 ClientHeight = 378
ClientWidth = 378 ClientWidth = 389
inherited Content: TPanel inherited Content: TPanel
Height = 318 Height = 378
Width = 378 Width = 389
ClientHeight = 318 ClientHeight = 378
ClientWidth = 378 ClientWidth = 389
object GroupBox1: TGroupBox[0] object GroupBox1: TGroupBox[0]
Left = 4 Left = 4
Height = 105 Height = 105
Top = 4 Top = 4
Width = 370 Width = 381
Align = alTop Align = alTop
BorderSpacing.Around = 4 BorderSpacing.Around = 4
Caption = 'about' Caption = 'about'
ClientHeight = 85 ClientHeight = 85
ClientWidth = 366 ClientWidth = 377
TabOrder = 0 TabOrder = 0
object Label1: TLabel object Label1: TLabel
Left = 0 Left = 0
Height = 85 Height = 85
Top = 0 Top = 0
Width = 366 Width = 377
Align = alClient Align = alClient
Alignment = taCenter Alignment = taCenter
AutoSize = False AutoSize = False
@ -46,20 +46,20 @@ inherited CEInfoWidget: TCEInfoWidget
end end
object GroupBox2: TGroupBox[1] object GroupBox2: TGroupBox[1]
Left = 4 Left = 4
Height = 201 Height = 261
Top = 113 Top = 113
Width = 370 Width = 381
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
Caption = 'tools status' Caption = 'tools status'
ClientHeight = 181 ClientHeight = 241
ClientWidth = 366 ClientWidth = 377
TabOrder = 1 TabOrder = 1
object boxTools: TScrollBox object boxTools: TScrollBox
Left = 4 Left = 4
Height = 173 Height = 233
Top = 4 Top = 4
Width = 358 Width = 369
HorzScrollBar.Page = 1 HorzScrollBar.Page = 1
VertScrollBar.Page = 1 VertScrollBar.Page = 1
Align = alClient Align = alClient

View File

@ -162,6 +162,9 @@ begin
fIsModal := true; fIsModal := true;
fIsDockable := false; fIsDockable := false;
// //
toolItem := TToolInfo.Construct(self, tikFindable, 'ddemangle');
toolItem.Parent := boxTools;
toolItem.ReAlign;
toolItem := TToolInfo.Construct(self, tikRunning, 'dcd-server'); toolItem := TToolInfo.Construct(self, tikRunning, 'dcd-server');
toolItem.Parent := boxTools; toolItem.Parent := boxTools;
toolItem.ReAlign; toolItem.ReAlign;