mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 11:19:26 +02:00
Fixed typo PrefferedSplitterX -> PreferredSplitterX throughout the code, spotted by Howard Page-Clark
git-svn-id: trunk@36912 -
This commit is contained in:
parent
fd03e9f920
commit
1060d6f033
@ -346,7 +346,7 @@ object BaseConfigGeneratorForm: TBaseConfigGeneratorForm
|
||||
Width = 454
|
||||
Align = alClient
|
||||
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar]
|
||||
PrefferedSplitterX = 200
|
||||
PreferredSplitterX = 200
|
||||
SplitterX = 200
|
||||
ValueFont.Color = clMaroon
|
||||
end
|
||||
|
@ -349,7 +349,7 @@ object BaseConfigExportForm: TBaseConfigExportForm
|
||||
Width = 536
|
||||
Align = alClient
|
||||
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw]
|
||||
PrefferedSplitterX = 200
|
||||
PreferredSplitterX = 200
|
||||
SplitterX = 200
|
||||
ValueFont.Color = clMaroon
|
||||
end
|
||||
|
@ -71,7 +71,7 @@ type
|
||||
property OnMouseUp;
|
||||
property OnResize;
|
||||
property PopupMenu;
|
||||
property PrefferedSplitterX;
|
||||
property PreferredSplitterX;
|
||||
property SplitterX;
|
||||
property Tabstop;
|
||||
property TIObject;
|
||||
|
@ -271,7 +271,7 @@ begin
|
||||
BorderSpacing.Around := 6;
|
||||
Visible := True;
|
||||
Align := alClient;
|
||||
PrefferedSplitterX := 200;
|
||||
PreferredSplitterX := 200;
|
||||
SplitterX := 200;
|
||||
Layout := oilHorizontal;
|
||||
end;
|
||||
|
@ -485,7 +485,7 @@ type
|
||||
property OnOIKeyDown: TKeyEvent read FOnOIKeyDown write FOnOIKeyDown;
|
||||
property OnSelectionChange: TNotifyEvent read FOnSelectionChange write FOnSelectionChange;
|
||||
property OnPropertyHint: TOIPropertyHint read FOnPropertyHint write FOnPropertyHint;
|
||||
property PrefferedSplitterX: integer read FPreferredSplitterX
|
||||
property PreferredSplitterX: integer read FPreferredSplitterX
|
||||
write FPreferredSplitterX default 100;
|
||||
property PropertyEditorHook: TPropertyEditorHook read FPropertyEditorHook
|
||||
write SetPropertyEditorHook;
|
||||
@ -533,7 +533,7 @@ type
|
||||
property OnResize;
|
||||
property OnSelectionChange;
|
||||
property PopupMenu;
|
||||
property PrefferedSplitterX;
|
||||
property PreferredSplitterX;
|
||||
property SplitterX;
|
||||
property Tabstop;
|
||||
property ValueFont;
|
||||
@ -3742,7 +3742,7 @@ begin
|
||||
FHeight:=AnObjInspector.Height;
|
||||
for Page:=Low(TObjectInspectorPage) to High(TObjectInspectorPage) do
|
||||
if AnObjInspector.GridControl[Page]<>nil then
|
||||
FGridSplitterX[Page]:=AnObjInspector.GridControl[Page].PrefferedSplitterX;
|
||||
FGridSplitterX[Page]:=AnObjInspector.GridControl[Page].PreferredSplitterX;
|
||||
FDefaultItemHeight:=AnObjInspector.DefaultItemHeight;
|
||||
FShowComponentTree:=AnObjInspector.ShowComponentTree;
|
||||
FComponentTreeHeight:=AnObjInspector.ComponentTreeHeight;
|
||||
@ -3784,7 +3784,7 @@ begin
|
||||
Grid := AnObjInspector.GridControl[Page];
|
||||
if Grid = nil then
|
||||
Continue;
|
||||
Grid.PrefferedSplitterX := FGridSplitterX[Page];
|
||||
Grid.PreferredSplitterX := FGridSplitterX[Page];
|
||||
Grid.SplitterX := FGridSplitterX[Page];
|
||||
AssignTo(Grid);
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user