paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 06:00:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: project options: disable Set WidgetSet button instead of hiding it.

Browse Source 
git-svn-id: trunk@53326 -
This commit is contained in:
ondrej 2016-11-09 11:30:57 +00:00
parent 31944eda39
commit d487f8a68d
3 changed files with 17 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
ide/frames/compiler_modematrix.lfm
View File

@ -28,7 +28,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
ShowHint = True ShowHint = True
end end
object BMMMoveDownButton: TToolButton object BMMMoveDownButton: TToolButton
Left = 27 Left = 24
Top = 0 Top = 0
Caption = 'Down' Caption = 'Down'
OnClick = BMMMoveDownButtonClick OnClick = BMMMoveDownButtonClick
@ -36,7 +36,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
ShowHint = True ShowHint = True
end end
object BMMUndoButton: TToolButton object BMMUndoButton: TToolButton
Left = 83 Left = 73
Top = 0 Top = 0
Caption = 'Undo' Caption = 'Undo'
OnClick = BMMUndoButtonClick OnClick = BMMUndoButtonClick
@ -44,7 +44,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
ShowHint = True ShowHint = True
end end
object BMMRedoToolButton: TToolButton object BMMRedoToolButton: TToolButton
Left = 126 Left = 110
Top = 0 Top = 0
Caption = 'Redo' Caption = 'Redo'
OnClick = BMMRedoToolButtonClick OnClick = BMMRedoToolButtonClick
@ -52,7 +52,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
ShowHint = True ShowHint = True
end end
object BMMDeleteButton: TToolButton object BMMDeleteButton: TToolButton
Left = 436 Left = 375
Top = 0 Top = 0
Caption = 'Delete' Caption = 'Delete'
OnClick = BMMDeleteButtonClick OnClick = BMMDeleteButtonClick
@ -60,7 +60,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
ShowHint = True ShowHint = True
end end
object MoveSepToolButton: TToolButton object MoveSepToolButton: TToolButton
Left = 73 Left = 63
Height = 25 Height = 25
Top = 0 Top = 0
Width = 10 Width = 10
@ -68,7 +68,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
Style = tbsSeparator Style = tbsSeparator
end end
object DoSepToolButton: TToolButton object DoSepToolButton: TToolButton
Left = 167 Left = 145
Height = 25 Height = 25
Top = 0 Top = 0
Width = 10 Width = 10
@ -76,7 +76,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
Style = tbsSeparator Style = tbsSeparator
end end
object AddSepToolButton: TToolButton object AddSepToolButton: TToolButton
Left = 426 Left = 365
Height = 25 Height = 25
Top = 0 Top = 0
Width = 10 Width = 10
@ -84,7 +84,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
Style = tbsSeparator Style = tbsSeparator
end end
object BMMAddOtherButton: TToolButton object BMMAddOtherButton: TToolButton
Left = 338 Left = 292
Top = 0 Top = 0
Caption = 'Add Other' Caption = 'Add Other'
DropdownMenu = BMMAddOtherPopupMenu DropdownMenu = BMMAddOtherPopupMenu
@ -92,14 +92,16 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
Style = tbsButtonDrop Style = tbsButtonDrop
end end
object BMMAddLclWidgetButton: TToolButton object BMMAddLclWidgetButton: TToolButton
Left = 177 Left = 155
Top = 0 Top = 0
Caption = 'Add LCLWidgetType' Caption = 'Add LCLWidgetType'
OnClick = BMMAddLclWidgetButtonClick OnClick = BMMAddLclWidgetButtonClick
ParentShowHint = False
ShowHint = True
Style = tbsButtonDrop Style = tbsButtonDrop
end end
object LCLMacroSepToolButton: TToolButton object LCLMacroSepToolButton: TToolButton
Left = 328 Left = 282
Height = 25 Height = 25
Top = 0 Top = 0
Width = 10 Width = 10
@ -107,7 +109,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
Style = tbsSeparator Style = tbsSeparator
end end
object BMMSystemEncodingButton: TToolButton object BMMSystemEncodingButton: TToolButton
Left = 498 Left = 426
Top = 0 Top = 0
Caption = 'Use system encoding' Caption = 'Use system encoding'
OnClick = BMMSystemEncodingButtonClick OnClick = BMMSystemEncodingButtonClick
@ -115,7 +117,7 @@ object CompOptModeMatrixFrame: TCompOptModeMatrixFrame
ShowHint = True ShowHint = True
end end
object DeleteSepToolButton: TToolButton object DeleteSepToolButton: TToolButton
Left = 488 Left = 416
Height = 25 Height = 25
Top = 0 Top = 0
Width = 10 Width = 10

4
ide/frames/compiler_modematrix.pas
View File

@ -660,8 +660,7 @@ begin
end; end;
List.Sort; List.Sort;
// LCLWidgetType gets its own button. // LCLWidgetType gets its own button.
BMMAddLclWidgetButton.Visible:=Assigned(LCLWidgetTypeMacro); BMMAddLclWidgetButton.Enabled:=Assigned(LCLWidgetTypeMacro);
LCLMacroSepToolButton.Visible:=BMMAddLclWidgetButton.Visible;
if Assigned(LCLWidgetTypeMacro) then if Assigned(LCLWidgetTypeMacro) then
AddLCLWidgetTypeValues(BMMAddLclWidgetPopupMenu, LCLWidgetTypeMacro); AddLCLWidgetTypeValues(BMMAddLclWidgetPopupMenu, LCLWidgetTypeMacro);
// Place other macros to the popup menu opened from "Add" button. // Place other macros to the popup menu opened from "Add" button.
@ -1234,6 +1233,7 @@ begin
fCaptionPatternMacroValue:=lisMMValueS; fCaptionPatternMacroValue:=lisMMValueS;
BMMAddLclWidgetButton.Caption:=Format(fCaptionPatternMacroName,['LCLWidgetType']); BMMAddLclWidgetButton.Caption:=Format(fCaptionPatternMacroName,['LCLWidgetType']);
BMMAddLclWidgetButton.Hint := lisMMWidgetSetAvailableForLCLProject;
BMMAddOtherButton.Caption:=lisAdd; BMMAddOtherButton.Caption:=lisAdd;
BMMSystemEncodingButton.Caption:=lisMMUseSystemEncoding; BMMSystemEncodingButton.Caption:=lisMMUseSystemEncoding;

1
ide/lazarusidestrconsts.pas
View File

@ -6219,6 +6219,7 @@ resourcestring
lisMMOverrideOutputDirectory = 'Override output directory (-FU)'; lisMMOverrideOutputDirectory = 'Override output directory (-FU)';
lisMMUseSystemEncoding = 'Use system encoding'; lisMMUseSystemEncoding = 'Use system encoding';
lisMMUseSystemEncodingHint = 'Disable support for UTF-8 default string encoding.'; lisMMUseSystemEncodingHint = 'Disable support for UTF-8 default string encoding.';
lisMMWidgetSetAvailableForLCLProject = 'WidgetSet change is available only for LCL projects';
lisPriority = 'Priority'; lisPriority = 'Priority';
lisUDScanningUnits = 'Scanning: %s units ...'; lisUDScanningUnits = 'Scanning: %s units ...';
lisUDFile = 'File: %s'; lisUDFile = 'File: %s';