Fixed typo PrefferedSplitterX -> PreferredSplitterX throughout the code, spotted by Howard Page-Clark

git-svn-id: trunk@36912 -
This commit is contained in:
maxim 2012-04-19 22:11:56 +00:00
parent fd03e9f920
commit 1060d6f033
5 changed files with 8 additions and 8 deletions

View File

@ -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

View File

@ -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

View File

@ -71,7 +71,7 @@ type
property OnMouseUp;
property OnResize;
property PopupMenu;
property PrefferedSplitterX;
property PreferredSplitterX;
property SplitterX;
property Tabstop;
property TIObject;

View File

@ -271,7 +271,7 @@ begin
BorderSpacing.Around := 6;
Visible := True;
Align := alClient;
PrefferedSplitterX := 200;
PreferredSplitterX := 200;
SplitterX := 200;
Layout := oilHorizontal;
end;

View File

@ -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;