📄 aqdockingconst.pas
字号:
{*******************************************************************}
{ }
{ AutomatedDocking Library (Cross-Platform Edition) }
{ }
{ Copyright (c) 1999-2008 AutomatedQA Corp. }
{ ALL RIGHTS RESERVED }
{ }
{ The entire contents of this file is protected by U.S. and }
{ International Copyright Laws. Unauthorized reproduction, }
{ reverse-engineering, and distribution of all or any portion of }
{ the code contained in this file is strictly prohibited and may }
{ result in severe civil and criminal penalties and will be }
{ prosecuted to the maximum extent possible under the law. }
{ }
{ RESTRICTIONS }
{ }
{ THIS SOURCE CODE AND ALL RESULTING INTERMEDIATE FILES }
{ (DCU, OBJ, DLL, ETC.) ARE CONFIDENTIAL AND PROPRIETARY TRADE }
{ SECRETS OF AUTOMATEDQA CORP. THE REGISTERED DEVELOPER IS }
{ LICENSED TO DISTRIBUTE THE AUTOMATEDDOCKING LIBRARY AND ALL }
{ ACCOMPANYING VCL AND CLX CONTROLS AS PART OF AN EXECUTABLE }
{ PROGRAM ONLY. }
{ }
{ THE SOURCE CODE CONTAINED WITHIN THIS FILE AND ALL RELATED }
{ FILES OR ANY PORTION OF ITS CONTENTS SHALL AT NO TIME BE }
{ COPIED, TRANSFERRED, SOLD, DISTRIBUTED, OR OTHERWISE MADE }
{ AVAILABLE TO OTHER INDIVIDUALS WITHOUT WRITTEN CONSENT }
{ AND PERMISSION FROM AUTOMATEDQA CORP. }
{ }
{ CONSULT THE END USER LICENSE AGREEMENT FOR INFORMATION ON }
{ ADDITIONAL RESTRICTIONS. }
{ }
{*******************************************************************}
unit aqDockingConst;
{$I aqDockingVer.inc}
interface
resourcestring
// aqDockingBase
SEDockingControlInvalidChildIndex = 'Invalid index %d (%d items total)';
SEDockingControlInvalidParent = 'TaqCustomDockingControl accepts only TaqCustomDockingSite and TCustomDockingContainer as a parent control';
SEDockingControlInvalidParentItem = 'Attempt to use parent control in a child-related operation';
SEDockingControlInvalidState = 'Invalid docking control state';
SEDockingControlInvalidChild = 'Cannot insert "%s" as a child component';
SEDockingControlUndeleteNotAllowed = 'Cannot undo deletion of docking control';
SEDockingControlFloatingDelete = 'Docking Controls cannot be deleted in floating mode. Use the Docking Setup dialog to delete controls in this case.';
SEDockingContainerAlignment = 'Invalid alignment "%s" specified for container "%s"';
SEDockingSiteDockingNotAllowed = 'Docking is not allowed';
SEDockingManagerInvalidStream = 'Invalid docking layout stream header';
SEDockingManagerStreamVersion = 'Invalid docking layout stream version';
SEDockingManagerStyleManagerNotAssigned = 'Style manager must be assigned';
SEDockingManagerStyleNotExists = 'Style "%s" does not exist';
SEDockingManagerInvalidControl = 'Invalid docking control';
SEDockingManagerSameKeys = 'AutoDragKey and AutoDockKey properties must differ';
SEDockingManagerInvalidKey = 'At least one mouse button modifier must be specified';
SEDockingControlsInvalidOwner = 'Docking manager as owner required';
SEDockingControlsNilContainer = 'Docking class container is nil';
SEFloatingSiteInvalidOwner = 'TaqCustomFloatingForm as owner required';
{$IFDEF VCL}
SEDockingManagerLoadRegistry = 'Error loading docking layout from the Regitry';
SEDockingManagerSaveRegistry = 'Error saving docking layout to the Regitry';
{$ENDIF}
// aqDocking
SRenameCaption = 'Caption:';
SDockingMenuItem = '&Docking';
SAlignMenuItem = '&Align';
SAlignMenuItemHint = 'Set alignment';
SAutoHideMenuItem = 'Au&to Hide';
SAutoHideMenuItemHint = 'Set auto hide';
SRenameMenuItem = '&Rename...';
SRenameMenuItemHint = 'Rename';
SDockSiteDesigner = 'Docking Site Designer';
SDockingControlStateHidden = 'Hidden';
SDockingControlStateDocked = 'Docked';
SDockingControlStateUndocked = 'Undocked';
SDockingControlAlignmentClient = 'Client';
SDockingControlAlignmentHClient = '&Client';
SDockingControlAlignmentLeft = 'Left';
SDockingControlAlignmentHLeft = '&Left';
SDockingControlAlignmentRight = 'Right';
SDockingControlAlignmentHRight = '&Right';
SDockingControlAlignmentTop = 'Top';
SDockingControlAlignmentHTop = '&Top';
SDockingControlAlignmentBottom = 'Bottom';
SDockingControlAlignmentHBottom = '&Bottom';
SDockingButtonHide = 'Hide';
SDockingButtonHHide = 'Hi&de';
SDockingButtonUndock = 'Undock';
SDockingButtonHUndock = '&Undock';
SDockingButtonAutoHide = 'Auto Hide';
SDockingButtonHAutoHide = '&Auto Hide';
SDockingButtonNoAutoHide = 'Auto Hide';
SDockingButtonHNoAutoHide = '&Auto Hide';
SDockingButtonMaximize = 'Maximize';
SDockingButtonHMaximize = 'Ma&ximize';
SDockingButtonRestore = 'Restore';
SDockingButtonHRestore = '&Restore';
SDockingButtonCustom = 'Custom';
SDockingButtonHCustom = '&Custom';
SDockingButtonHelp = 'Help';
SDockingButtonHHelp = '&Help';
SDockingButtonMenu = 'Menu';
SDockingButtonHMenu = '&Menu';
SEDockingManagerBadOwner = 'TaqDockingManager requires TCustomForm as owner';
SEDockingManagerMoreThanOne = 'Only single instance of TaqDockingManager on one form is allowed';
SEDockingSiteBadOwner = 'TaqDockingSite can be placed on a form only';
SEDockingSiteMoreThanOne = 'Only single instance of TaqDockingSite on one form is allowed';
SEDockingSiteNoMultiple = 'TaqDockingSite: Cannot associate multiple DockSites with one DockingManager';
SEDockingSiteNilOwner = 'Docking site''s owner cannot have a nil value';
SEDockerEmptyRegion = 'Too small region to dock to (%s)';
SENullDockingSiteDockToInvisibleControl = 'Docking to invisible control is not allowed';
SEInsideContainerInvalidTabIndex = 'Invalid tab index %d for %d total tab count';
SDockingSiteDesignerCaption = 'Click the tab to edit controls on a panel...';
STabsMenuItem = 'T&abs';
STabsMenuItemHint = 'Tab list';
SAlignTopMenuItem = '&Top';
SAlignTopMenuitemHint = 'Top orientation';
SAlignBottomMenuItem = '&Bottom';
SAlignBottomMenuItemHint = 'Bottom orientation';
SDockingHint = 'Target: %s'#13#10'Position: %s';
SDockingRegionLeft = 'Left';
SDockingRegionRight = 'Right';
SDockingRegionTop = 'Top';
SDockingRegionBottom = 'Bottom';
SDockingRegionInside = 'Inside';
SDockingRegionNone = 'None';
// Design Time
SDockingControlVisibleChanging = 'Use the Docking Setup dialog to change the Visible property of docking controls.';
// aqDockingUI
SEInvalidMetricValue = 'Property value should be in the bounds %d..%d';
// aqDockCustForm
SENoDockSite = 'aqDockigSite should be associated with aqDockingManager to perform this operation';
// aqDockingUtils
SEDuplicatedClass = 'Class name %s duplicated';
SEListNoItems = 'TIntegerList has no more items';
SEWinControlRequired = 'TWinControl required';
SEWidgetControlRequired = 'TWidgetControl required';
{$IFDEF DEMO}
SDemoMessage = 'You are currently using a demo version of the AutomatedQA Docking Library. This version works only from within the IDE. '+
'To order the fully functional version, please visit our web site www.automatedqa.com, or contact us at support@automatedqa.com.';
SDemoCaption = 'AutomatedDocking Library';
{$ENDIF}
const
// Product-specific constants.
SProductName = 'AutomatedDocking Library';
SProductVersion = '1.9';
SAutomatedQAUrl = 'http://www.automatedqa.com';
SAutomatedQA = 'AutomatedQA Corp.';
dcidControl = 0;
dcidVerticalContainer = 1;
dcidHorizontalContainer = 2;
dcidInsideContainer = 3;
dsidMainSite = 0;
dsidFloatingSite = 1;
// Section and value names used in streaming operations.
SPlacementInfoContainerId = 'PlacementInfo.ContainerId';
SPlacementInfoOrder = 'PlacementInfo.Order';
SPlacementInfoParentKey = 'PlacementInfo.ParentKey';
SPlacementInfoTabOrientation = 'PlacementInfo.TabOrientation';
SPlacementInfoAlignment = 'PlacementInfo.Alignment';
SPlacementInfoHideSize = 'PlacementInfo.HideSize';
SFormPlacementInfoMask = 'FormPlacementInfo.Mask';
SFormPlacementInfoBounds = 'FormPlacementInfo.Bounds';
SFormPlacementInfoWindowState = 'FormPlacementInfo.WindowState';
SFormPlacementInfoConstraintsMaxHeight = 'FormPlacementInfo.Constraints.MaxHeight';
SFormPlacementInfoConstraintsMaxWidth = 'FormPlacementInfo.Constraints.MaxWidth';
SFormPlacementInfoConstraintsMinHeight = 'FormPlacementInfo.Constraints.MinHeight';
SFormPlacementInfoConstraintsMinWidth = 'FormPlacementInfo.Constraints.MinWidth';
SFormPlacementInfoActiveControl = 'FormPlacementInfo.ActiveControl';
SInsideContainerCurrentTab = 'CurrentTab';
SInsideContainerOrientation = 'Orientation';
SDockingControlScreenRect = 'ScreenRect';
SDockingControlNormalSize = 'NormalSize';
SDockingControlPanelState = 'PanelState';
SDockingControlCaption = 'Caption';
SDockingControlAlignment = 'Alignment';
SDockingControlShowCaption = 'ShowCaption';
SDockingControlAHOrientation = 'AHOrientation';
SDockingControlAHContainer = 'AHContainer';
SDockingControlAHSite = 'AHSite';
SDockingControlTypeId = 'TypeId';
SDockingControlKey = 'Key';
SDockingControlChildrenCount = 'ChildrenCount';
SDockingSiteHasMainItem = 'HasMainItem';
SDockingManagerDockingSiteTypeId = 'TypeId';
SDockingManagerDockingSiteKey = 'Key';
SDockingManagerHeader = 'Header';
SDockingManagerVersion = 'Version';
SFloatingSiteFormBounds = 'FormBounds';
SFloatingSiteFormState = 'FormState';
SPlacementInfoPosition = 'PlacementInfo.Position';
SPlacementInfoSize = 'PlacementInfo.Size';
SPlacementInfoState = 'PlacementInfo.State';
SPlacementInfoFloatPosition = 'PlacementInfo.FloatPosition';
SPlacementInfoFloatSize = 'PlacementInfo.FloatSize';
SPlacementInfoFloatState = 'SPlacementInfoFloatState';
SDockingHideZoneTabCount = 'Tabs';
SDockingHideZoneTabState = 'State';
SDockingHideZoneLeft = 'Left';
SDockingHideZoneTop = 'Top';
SDockingHideZoneRight = 'Right';
SDockingHideZoneBottom = 'Bottom';
SXMLTagDocking = 'Docking';
SXMLTagControl = 'Control';
SXMLTagControls = 'Controls';
SXMLTagLayout = 'Layout';
SXMLTagSite = 'Site';
SXMLTagSites = 'Sites';
SXMLAttrVersion = 'Version';
SDefaultStyleName = 'Default';
SStandardStyleName = 'Standard';
SEnhancedStyleName = 'Enhanced';
SMSVS2005StyleName = 'VS2005';
SFlatStyleName = 'Flat';
{$IFDEF VCL}
SThemedStyleName = 'Themed';
SOfficeXPStyleName = 'OfficeXP';
{$ELSE}
// todo SQtStyleName = 'QtStyle';
{$ENDIF}
implementation
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -