mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-21 08:39:50 +01:00
IDE: started frame for editing build modes
git-svn-id: trunk@17992 -
This commit is contained in:
parent
8a652e2213
commit
940989a1ae
3
.gitattributes
vendored
3
.gitattributes
vendored
@ -2565,6 +2565,9 @@ ide/frames/options_codetools_space.pas svneol=native#text/pascal
|
|||||||
ide/frames/options_codetools_wordpolicy.lfm svneol=native#text/plain
|
ide/frames/options_codetools_wordpolicy.lfm svneol=native#text/plain
|
||||||
ide/frames/options_codetools_wordpolicy.lrs svneol=native#text/pascal
|
ide/frames/options_codetools_wordpolicy.lrs svneol=native#text/pascal
|
||||||
ide/frames/options_codetools_wordpolicy.pas svneol=native#text/pascal
|
ide/frames/options_codetools_wordpolicy.pas svneol=native#text/pascal
|
||||||
|
ide/frames/options_compiler_buildmodes.lfm svneol=native#text/plain
|
||||||
|
ide/frames/options_compiler_buildmodes.lrs svneol=native#text/plain
|
||||||
|
ide/frames/options_compiler_buildmodes.pas svneol=native#text/plain
|
||||||
ide/frames/options_compiler_conditionals.lfm svneol=native#text/plain
|
ide/frames/options_compiler_conditionals.lfm svneol=native#text/plain
|
||||||
ide/frames/options_compiler_conditionals.lrs svneol=native#text/plain
|
ide/frames/options_compiler_conditionals.lrs svneol=native#text/plain
|
||||||
ide/frames/options_compiler_conditionals.pas svneol=native#text/plain
|
ide/frames/options_compiler_conditionals.pas svneol=native#text/plain
|
||||||
|
|||||||
@ -1,7 +1,7 @@
|
|||||||
object frmCompilerOptions: TfrmCompilerOptions
|
object frmCompilerOptions: TfrmCompilerOptions
|
||||||
Left = 389
|
Left = 394
|
||||||
Height = 528
|
Height = 528
|
||||||
Top = 163
|
Top = 187
|
||||||
Width = 669
|
Width = 669
|
||||||
ActiveControl = MainNotebook
|
ActiveControl = MainNotebook
|
||||||
BorderIcons = [biSystemMenu]
|
BorderIcons = [biSystemMenu]
|
||||||
|
|||||||
@ -1,8 +1,8 @@
|
|||||||
{ This is an automatically generated lazarus resource file }
|
{ This is an automatically generated lazarus resource file }
|
||||||
|
|
||||||
LazarusResources.Add('TfrmCompilerOptions','FORMDATA',[
|
LazarusResources.Add('TfrmCompilerOptions','FORMDATA',[
|
||||||
'TPF0'#19'TfrmCompilerOptions'#18'frmCompilerOptions'#4'Left'#3#133#1#6'Heigh'
|
'TPF0'#19'TfrmCompilerOptions'#18'frmCompilerOptions'#4'Left'#3#138#1#6'Heigh'
|
||||||
+'t'#3#16#2#3'Top'#3#163#0#5'Width'#3#157#2#13'ActiveControl'#7#12'MainNotebo'
|
+'t'#3#16#2#3'Top'#3#187#0#5'Width'#3#157#2#13'ActiveControl'#7#12'MainNotebo'
|
||||||
+'ok'#11'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#18'frmCompilerOption'
|
+'ok'#11'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#18'frmCompilerOption'
|
||||||
+'s'#12'ClientHeight'#3#16#2#11'ClientWidth'#3#157#2#21'Constraints.MinHeight'
|
+'s'#12'ClientHeight'#3#16#2#11'ClientWidth'#3#157#2#21'Constraints.MinHeight'
|
||||||
+#3#244#1#20'Constraints.MinWidth'#3'X'#2#7'OnClose'#7#23'frmCompilerOptionsC'
|
+#3#244#1#20'Constraints.MinWidth'#3'X'#2#7'OnClose'#7#23'frmCompilerOptionsC'
|
||||||
|
|||||||
163
ide/frames/options_compiler_buildmodes.lfm
Normal file
163
ide/frames/options_compiler_buildmodes.lfm
Normal file
@ -0,0 +1,163 @@
|
|||||||
|
object CompOptBuildModesFrame: TCompOptBuildModesFrame
|
||||||
|
Left = 0
|
||||||
|
Height = 233
|
||||||
|
Top = 0
|
||||||
|
Width = 492
|
||||||
|
ClientHeight = 229
|
||||||
|
ClientWidth = 488
|
||||||
|
Ctl3D = False
|
||||||
|
TabOrder = 0
|
||||||
|
Visible = False
|
||||||
|
DesignLeft = 294
|
||||||
|
DesignTop = 256
|
||||||
|
object ModesGroupBox: TGroupBox
|
||||||
|
Left = 0
|
||||||
|
Height = 229
|
||||||
|
Top = 0
|
||||||
|
Width = 186
|
||||||
|
Align = alLeft
|
||||||
|
Caption = 'ModesGroupBox'
|
||||||
|
ClientHeight = 210
|
||||||
|
ClientWidth = 182
|
||||||
|
Ctl3D = False
|
||||||
|
TabOrder = 0
|
||||||
|
object NewSpeedButton: TSpeedButton
|
||||||
|
AnchorSideLeft.Control = ModesGroupBox
|
||||||
|
AnchorSideBottom.Control = ModesGroupBox
|
||||||
|
AnchorSideBottom.Side = asrBottom
|
||||||
|
Left = 0
|
||||||
|
Height = 22
|
||||||
|
Top = 188
|
||||||
|
Width = 23
|
||||||
|
Anchors = [akLeft, akBottom]
|
||||||
|
Color = clBtnFace
|
||||||
|
NumGlyphs = 0
|
||||||
|
end
|
||||||
|
object DeleteSpeedButton: TSpeedButton
|
||||||
|
AnchorSideLeft.Control = NewSpeedButton
|
||||||
|
AnchorSideLeft.Side = asrBottom
|
||||||
|
AnchorSideTop.Control = NewSpeedButton
|
||||||
|
Left = 23
|
||||||
|
Height = 22
|
||||||
|
Top = 188
|
||||||
|
Width = 23
|
||||||
|
Color = clBtnFace
|
||||||
|
NumGlyphs = 0
|
||||||
|
end
|
||||||
|
object MoveDownSpeedButton: TSpeedButton
|
||||||
|
AnchorSideLeft.Control = DeleteSpeedButton
|
||||||
|
AnchorSideLeft.Side = asrBottom
|
||||||
|
AnchorSideTop.Control = NewSpeedButton
|
||||||
|
Left = 46
|
||||||
|
Height = 22
|
||||||
|
Top = 188
|
||||||
|
Width = 23
|
||||||
|
Color = clBtnFace
|
||||||
|
NumGlyphs = 0
|
||||||
|
end
|
||||||
|
object MoveUpSpeedButton: TSpeedButton
|
||||||
|
AnchorSideLeft.Control = MoveDownSpeedButton
|
||||||
|
AnchorSideLeft.Side = asrBottom
|
||||||
|
AnchorSideTop.Control = NewSpeedButton
|
||||||
|
Left = 69
|
||||||
|
Height = 22
|
||||||
|
Top = 188
|
||||||
|
Width = 23
|
||||||
|
Color = clBtnFace
|
||||||
|
NumGlyphs = 0
|
||||||
|
end
|
||||||
|
object ModesListBox: TListBox
|
||||||
|
AnchorSideBottom.Control = NewSpeedButton
|
||||||
|
Left = 0
|
||||||
|
Height = 188
|
||||||
|
Top = 0
|
||||||
|
Width = 182
|
||||||
|
Align = alTop
|
||||||
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||||
|
ItemHeight = 0
|
||||||
|
TabOrder = 0
|
||||||
|
TopIndex = -1
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object ValuesGroupBox: TGroupBox
|
||||||
|
Left = 191
|
||||||
|
Height = 229
|
||||||
|
Top = 0
|
||||||
|
Width = 297
|
||||||
|
Align = alClient
|
||||||
|
Caption = 'ValuesGroupBox'
|
||||||
|
ClientHeight = 210
|
||||||
|
ClientWidth = 293
|
||||||
|
Ctl3D = False
|
||||||
|
TabOrder = 1
|
||||||
|
object ValuesStringGrid: TStringGrid
|
||||||
|
Left = 0
|
||||||
|
Height = 95
|
||||||
|
Top = 0
|
||||||
|
Width = 293
|
||||||
|
Align = alClient
|
||||||
|
ColCount = 2
|
||||||
|
FixedCols = 0
|
||||||
|
TabOrder = 0
|
||||||
|
end
|
||||||
|
object DefaultValueGroupBox: TGroupBox
|
||||||
|
Left = 0
|
||||||
|
Height = 109
|
||||||
|
Top = 101
|
||||||
|
Width = 293
|
||||||
|
Align = alBottom
|
||||||
|
Caption = 'DefaultValueGroupBox'
|
||||||
|
ClientHeight = 90
|
||||||
|
ClientWidth = 289
|
||||||
|
Ctl3D = False
|
||||||
|
TabOrder = 1
|
||||||
|
inline CompOptsConditionalsFrame1: TCompOptsConditionalsFrame
|
||||||
|
Height = 90
|
||||||
|
Width = 289
|
||||||
|
Align = alClient
|
||||||
|
ClientHeight = 86
|
||||||
|
ClientWidth = 285
|
||||||
|
Visible = True
|
||||||
|
inherited COCTreeView: TTreeView
|
||||||
|
Height = 86
|
||||||
|
Width = 285
|
||||||
|
end
|
||||||
|
inherited COCPopupMenu: TPopupMenu
|
||||||
|
inherited InsertAboveMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited InsertBelowMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited InsertChildMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited DeleteMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited MoveUpMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited MoveDownMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited MoveLvlUpMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited MoveLvlDownMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
inherited PropertiesMenuItem: TMenuItem
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object ValuesSplitter: TSplitter
|
||||||
|
Cursor = crVSplit
|
||||||
|
Left = 0
|
||||||
|
Height = 6
|
||||||
|
Top = 95
|
||||||
|
Width = 293
|
||||||
|
Align = alBottom
|
||||||
|
ResizeAnchor = akBottom
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object MainSplitter: TSplitter
|
||||||
|
Left = 186
|
||||||
|
Height = 229
|
||||||
|
Top = 0
|
||||||
|
Width = 5
|
||||||
|
end
|
||||||
|
end
|
||||||
50
ide/frames/options_compiler_buildmodes.lrs
Normal file
50
ide/frames/options_compiler_buildmodes.lrs
Normal file
@ -0,0 +1,50 @@
|
|||||||
|
{ This is an automatically generated lazarus resource file }
|
||||||
|
|
||||||
|
LazarusResources.Add('TCompOptBuildModesFrame','FORMDATA',[
|
||||||
|
'TPF0'#23'TCompOptBuildModesFrame'#22'CompOptBuildModesFrame'#4'Left'#2#0#6'H'
|
||||||
|
+'eight'#3#233#0#3'Top'#2#0#5'Width'#3#236#1#12'ClientHeight'#3#229#0#11'Clie'
|
||||||
|
+'ntWidth'#3#232#1#5'Ctl3D'#8#8'TabOrder'#2#0#7'Visible'#8#10'DesignLeft'#3'&'
|
||||||
|
+#1#9'DesignTop'#3#0#1#0#9'TGroupBox'#13'ModesGroupBox'#4'Left'#2#0#6'Height'
|
||||||
|
+#3#229#0#3'Top'#2#0#5'Width'#3#186#0#5'Align'#7#6'alLeft'#7'Caption'#6#13'Mo'
|
||||||
|
+'desGroupBox'#12'ClientHeight'#3#210#0#11'ClientWidth'#3#182#0#5'Ctl3D'#8#8
|
||||||
|
+'TabOrder'#2#0#0#12'TSpeedButton'#14'NewSpeedButton'#22'AnchorSideLeft.Contr'
|
||||||
|
+'ol'#7#13'ModesGroupBox'#24'AnchorSideBottom.Control'#7#13'ModesGroupBox'#21
|
||||||
|
+'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#22#3'Top'#3
|
||||||
|
+#188#0#5'Width'#2#23#7'Anchors'#11#6'akLeft'#8'akBottom'#0#5'Color'#7#9'clBt'
|
||||||
|
+'nFace'#9'NumGlyphs'#2#0#0#0#12'TSpeedButton'#17'DeleteSpeedButton'#22'Ancho'
|
||||||
|
+'rSideLeft.Control'#7#14'NewSpeedButton'#19'AnchorSideLeft.Side'#7#9'asrBott'
|
||||||
|
+'om'#21'AnchorSideTop.Control'#7#14'NewSpeedButton'#4'Left'#2#23#6'Height'#2
|
||||||
|
+#22#3'Top'#3#188#0#5'Width'#2#23#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#0#0
|
||||||
|
+#12'TSpeedButton'#19'MoveDownSpeedButton'#22'AnchorSideLeft.Control'#7#17'De'
|
||||||
|
+'leteSpeedButton'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Co'
|
||||||
|
+'ntrol'#7#14'NewSpeedButton'#4'Left'#2'.'#6'Height'#2#22#3'Top'#3#188#0#5'Wi'
|
||||||
|
+'dth'#2#23#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#0#0#12'TSpeedButton'#17
|
||||||
|
+'MoveUpSpeedButton'#22'AnchorSideLeft.Control'#7#19'MoveDownSpeedButton'#19
|
||||||
|
+'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#14'NewSpeed'
|
||||||
|
+'Button'#4'Left'#2'E'#6'Height'#2#22#3'Top'#3#188#0#5'Width'#2#23#5'Color'#7
|
||||||
|
+#9'clBtnFace'#9'NumGlyphs'#2#0#0#0#8'TListBox'#12'ModesListBox'#24'AnchorSid'
|
||||||
|
+'eBottom.Control'#7#14'NewSpeedButton'#4'Left'#2#0#6'Height'#3#188#0#3'Top'#2
|
||||||
|
+#0#5'Width'#3#182#0#5'Align'#7#5'alTop'#7'Anchors'#11#5'akTop'#6'akLeft'#7'a'
|
||||||
|
+'kRight'#8'akBottom'#0#10'ItemHeight'#2#0#8'TabOrder'#2#0#8'TopIndex'#2#255#0
|
||||||
|
+#0#0#9'TGroupBox'#14'ValuesGroupBox'#4'Left'#3#191#0#6'Height'#3#229#0#3'Top'
|
||||||
|
+#2#0#5'Width'#3')'#1#5'Align'#7#8'alClient'#7'Caption'#6#14'ValuesGroupBox'
|
||||||
|
+#12'ClientHeight'#3#210#0#11'ClientWidth'#3'%'#1#5'Ctl3D'#8#8'TabOrder'#2#1#0
|
||||||
|
+#11'TStringGrid'#16'ValuesStringGrid'#4'Left'#2#0#6'Height'#2'_'#3'Top'#2#0#5
|
||||||
|
+'Width'#3'%'#1#5'Align'#7#8'alClient'#8'ColCount'#2#2#9'FixedCols'#2#0#8'Tab'
|
||||||
|
+'Order'#2#0#0#0#9'TGroupBox'#20'DefaultValueGroupBox'#4'Left'#2#0#6'Height'#2
|
||||||
|
+'m'#3'Top'#2'e'#5'Width'#3'%'#1#5'Align'#7#8'alBottom'#7'Caption'#6#20'Defau'
|
||||||
|
+'ltValueGroupBox'#12'ClientHeight'#2'Z'#11'ClientWidth'#3'!'#1#5'Ctl3D'#8#8
|
||||||
|
+'TabOrder'#2#1#0#244#26'TCompOptsConditionalsFrame'#26'CompOptsConditionalsF'
|
||||||
|
+'rame1'#6'Height'#2'Z'#5'Width'#3'!'#1#5'Align'#7#8'alClient'#12'ClientHeigh'
|
||||||
|
+'t'#2'V'#11'ClientWidth'#3#29#1#7'Visible'#9#0#241#9'TTreeView'#11'COCTreeVi'
|
||||||
|
+'ew'#6'Height'#2'V'#5'Width'#3#29#1#0#0#241#10'TPopupMenu'#12'COCPopupMenu'#0
|
||||||
|
+#241#9'TMenuItem'#19'InsertAboveMenuItem'#0#0#241#9'TMenuItem'#19'InsertBelo'
|
||||||
|
+'wMenuItem'#0#0#241#9'TMenuItem'#19'InsertChildMenuItem'#0#0#241#9'TMenuItem'
|
||||||
|
+#14'DeleteMenuItem'#0#0#241#9'TMenuItem'#14'MoveUpMenuItem'#0#0#241#9'TMenuI'
|
||||||
|
+'tem'#16'MoveDownMenuItem'#0#0#241#9'TMenuItem'#17'MoveLvlUpMenuItem'#0#0#241
|
||||||
|
+#9'TMenuItem'#19'MoveLvlDownMenuItem'#0#0#241#9'TMenuItem'#18'PropertiesMenu'
|
||||||
|
+'Item'#0#0#0#0#0#9'TSplitter'#14'ValuesSplitter'#6'Cursor'#7#8'crVSplit'#4'L'
|
||||||
|
+'eft'#2#0#6'Height'#2#6#3'Top'#2'_'#5'Width'#3'%'#1#5'Align'#7#8'alBottom'#12
|
||||||
|
+'ResizeAnchor'#7#8'akBottom'#0#0#0#9'TSplitter'#12'MainSplitter'#4'Left'#3
|
||||||
|
+#186#0#6'Height'#3#229#0#3'Top'#2#0#5'Width'#2#5#0#0#0
|
||||||
|
]);
|
||||||
57
ide/frames/options_compiler_buildmodes.pas
Normal file
57
ide/frames/options_compiler_buildmodes.pas
Normal file
@ -0,0 +1,57 @@
|
|||||||
|
{***************************************************************************
|
||||||
|
* *
|
||||||
|
* This source is free software; you can redistribute it and/or modify *
|
||||||
|
* it under the terms of the GNU General Public License as published by *
|
||||||
|
* the Free Software Foundation; either version 2 of the License, or *
|
||||||
|
* (at your option) any later version. *
|
||||||
|
* *
|
||||||
|
* This code is distributed in the hope that it will be useful, but *
|
||||||
|
* WITHOUT ANY WARRANTY; without even the implied warranty of *
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU *
|
||||||
|
* General Public License for more details. *
|
||||||
|
* *
|
||||||
|
* A copy of the GNU General Public License is available on the World *
|
||||||
|
* Wide Web at <http://www.gnu.org/copyleft/gpl.html>. You can also *
|
||||||
|
* obtain it by writing to the Free Software Foundation, *
|
||||||
|
* Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
|
||||||
|
* *
|
||||||
|
***************************************************************************
|
||||||
|
}
|
||||||
|
unit options_compiler_buildmodes;
|
||||||
|
|
||||||
|
{$mode objfpc}{$H+}
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Classes, SysUtils, FileUtil, LResources, Forms, StdCtrls, Grids, Buttons,
|
||||||
|
ExtCtrls, Options_Compiler_Conditionals;
|
||||||
|
|
||||||
|
type
|
||||||
|
|
||||||
|
{ TCompOptBuildModesFrame }
|
||||||
|
|
||||||
|
TCompOptBuildModesFrame = class(TFrame)
|
||||||
|
CompOptsConditionalsFrame1: TCompOptsConditionalsFrame;
|
||||||
|
DefaultValueGroupBox: TGroupBox;
|
||||||
|
ValuesGroupBox: TGroupBox;
|
||||||
|
ModesGroupBox: TGroupBox;
|
||||||
|
ModesListBox: TListBox;
|
||||||
|
NewSpeedButton: TSpeedButton;
|
||||||
|
DeleteSpeedButton: TSpeedButton;
|
||||||
|
MoveDownSpeedButton: TSpeedButton;
|
||||||
|
MoveUpSpeedButton: TSpeedButton;
|
||||||
|
MainSplitter: TSplitter;
|
||||||
|
ValuesSplitter: TSplitter;
|
||||||
|
ValuesStringGrid: TStringGrid;
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
initialization
|
||||||
|
{$I options_compiler_buildmodes.lrs}
|
||||||
|
|
||||||
|
end.
|
||||||
|
|
||||||
@ -1,5 +1,3 @@
|
|||||||
{ This is an automatically generated lazarus resource file }
|
|
||||||
|
|
||||||
LazarusResources.Add('TCompOptsConditionalsFrame','FORMDATA',[
|
LazarusResources.Add('TCompOptsConditionalsFrame','FORMDATA',[
|
||||||
'TPF0'#26'TCompOptsConditionalsFrame'#25'CompOptsConditionalsFrame'#4'Left'#2
|
'TPF0'#26'TCompOptsConditionalsFrame'#25'CompOptsConditionalsFrame'#4'Left'#2
|
||||||
+#0#6'Height'#3#170#0#3'Top'#2#0#5'Width'#3#129#1#12'ClientHeight'#3#166#0#11
|
+#0#6'Height'#3#170#0#3'Top'#2#0#5'Width'#3#129#1#12'ClientHeight'#3#166#0#11
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user