Слияние кода завершено, страница обновится автоматически
(object Petal
version 42
_written "Microsoft Visual Modeler 2.0.8139"
charSet 134)
(object Design "Logical View"
is_unit TRUE
is_loaded TRUE
defaults (object defaults
rightMargin 0.250000
leftMargin 0.250000
topMargin 0.250000
bottomMargin 0.500000
pageOverlap 0.250000
clipIconLabels TRUE
autoResize TRUE
snapToGrid TRUE
gridX 16
gridY 16
defaultFont (object Font
size 9
face "Tahoma"
charSet 134
bold FALSE
italics FALSE
underline FALSE
strike FALSE
color 0
default_color TRUE)
showMessageNum 3
showClassOfObject TRUE
notation "Unified")
root_usecase_package (object Class_Category "Use Case View"
quid "4A99921C037F"
exportControl "Public"
global TRUE
logical_models (list unit_reference_list)
logical_presentations (list unit_reference_list
(object UseCaseDiagram "Main"
quid "4A99921D00B0"
title "Main"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
root_category (object Class_Category "Logical View"
quid "4A99921C037E"
exportControl "Public"
global TRUE
subsystem "Component View"
quidu "4A99921C0380"
logical_models (list unit_reference_list
(object Class_Category "User Services"
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "User Services"))
quid "4A99921D00BE"
documentation "User services provide the visual interface for presenting information and gathering data in an application. The user services connect the user with the application and request the business and/or data services needed by the user to execute business tasks."
visible_categories (list visibility_relationship_list
(object Visibility_Relationship
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "Business Services"))
quid "4A99921D00C4"
supplier "Logical View::Business Services"
quidu "4A99921D00C0")
(object Visibility_Relationship
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "Data Services"))
quid "4A99921D00C5"
supplier "Logical View::Data Services"
quidu "4A99921D00C2"))
exportControl "Public"
logical_models (list unit_reference_list)
logical_presentations (list unit_reference_list
(object ClassDiagram "Package Overview"
quid "4A99921D00BF"
title "Package Overview"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
(object Class_Category "Business Services"
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "Business Services"))
quid "4A99921D00C0"
documentation "Business services respond to requests from the user (or other business services) in order to execute a business task. They accomplish this by requesting the data services needed and applying formal procedures and business rules to the relevant data. This protocol insulates the user from direct interaction with the database. Because business rules tend to change more frequently than the specific business tasks they support, they are ideal candidates for encapsulating in components that are physically separate from the application logic itself."
visible_categories (list visibility_relationship_list
(object Visibility_Relationship
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "User Services"))
quid "4A99921D00C6"
supplier "Logical View::User Services"
quidu "4A99921D00BE")
(object Visibility_Relationship
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "Data Services"))
quid "4A99921D00C7"
supplier "Logical View::Data Services"
quidu "4A99921D00C2"))
exportControl "Public"
logical_models (list unit_reference_list)
logical_presentations (list unit_reference_list
(object ClassDiagram "Package Overview"
quid "4A99921D00C1"
title "Package Overview"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
(object Class_Category "Data Services"
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "Data Services"))
quid "4A99921D00C2"
documentation "Data services maintain, access, and update data. They also manage and satisfy requests to manipulate data that are initiated by business services. Separating data services allows the data structure and access mechanisms to be maintained, modified, or, if necessary, even re-architected without affecting business or user services."
visible_categories (list visibility_relationship_list
(object Visibility_Relationship
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "User Services"))
quid "4A99921D00C8"
supplier "Logical View::User Services"
quidu "4A99921D00BE")
(object Visibility_Relationship
attributes (list Attribute_Set
(object Attribute
tool "VisualBasic"
name "TierPackage"
value "Data Services"))
quid "4A99921D00C9"
supplier "Logical View::Business Services"
quidu "4A99921D00C0"))
exportControl "Public"
logical_models (list unit_reference_list)
logical_presentations (list unit_reference_list
(object ClassDiagram "Package Overview"
quid "4A99921D00C3"
title "Package Overview"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
(object Class_Category "控件程序说明"
quid "4A99928F0340"
exportControl "Public"
logical_models (list unit_reference_list
(object Class "VB6Resizer"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A9992900072"
stereotype "User Control"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A99929000A0"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider"
quidu "4A99929300D2"))
operations (list Operations
(object Operation "Form"
quid "4A99929000F2"
stereotype "Get"
result "Form"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "Enabled"
quid "4A99929000F3"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "Boolean"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Enabled"
quid "4A99929000FF"
stereotype "Get"
result "Boolean"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MaxWidth"
quid "4A999290010E"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "Single"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MaxWidth"
quid "4A9992900110"
stereotype "Get"
result "Single"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MinWidth"
quid "4A999290011D"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "Single"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MinWidth"
quid "4A999290012D"
stereotype "Get"
result "Single"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MaxHeight"
quid "4A999290012E"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "Single"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MaxHeight"
quid "4A999290013D"
stereotype "Get"
result "Single"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MinHeight"
quid "4A999290014C"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "Single"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MinHeight"
quid "4A999290015C"
stereotype "Get"
result "Single"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Mode"
quid "4A999290015D"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "vrMode"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Mode"
quid "4A999290016D"
stereotype "Get"
result "vrMode"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ShowAboutBox"
quid "4A999290017B"
documentation " 显示关于对话框"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ISettingProvider_AfterResize"
quid "4A999290018B"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_BeforeResize"
quid "4A999290018C"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_Enabled"
quid "4A999290019A"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_Form"
quid "4A99929001AA"
stereotype "Get"
result "Object"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_MaxHeight"
quid "4A99929001BA"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_MaxWidth"
quid "4A99929001C9"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_MinHeight"
quid "4A99929001D9"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_MinWidth"
quid "4A99929001E9"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_Mode"
quid "4A99929001F8"
stereotype "Get"
result "Long"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ISettingProvider_UserMode"
quid "4A9992900208"
stereotype "Get"
result "Boolean"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "CheckParentForm"
quid "4A9992900218"
documentation " 检查父窗口是否为Form"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "UserControl_InitProperties"
quid "4A9992900227"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "GetInitialPositions"
quid "4A9992900237"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "UserControl_ReadProperties"
quid "4A9992900238"
parameters (list Parameters
(object Parameter "PropBag"
type "PropertyBag"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "UserControl_Resize"
quid "4A9992900256"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "UserControl_Terminate"
quid "4A9992900257"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "UserControl_WriteProperties"
quid "4A9992900275"
parameters (list Parameters
(object Parameter "PropBag"
type "PropertyBag"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ResizeAll"
quid "4A9992900285"
documentation " 调整窗口"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "BeforeResize"
quid "4A9992900295"
stereotype "Event"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "AfterResize"
quid "4A99929002A4"
stereotype "Event"
concurrency "Sequential"
opExportControl "Public"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mdblMaxWidth"
quid "4A99929000B0"
type "Double")
(object ClassAttribute "mdblMinWidth"
quid "4A99929000B1"
type "Double")
(object ClassAttribute "mdblMaxHeight"
quid "4A99929000C0"
type "Double")
(object ClassAttribute "mdblMinHeight"
quid "4A99929000C1"
type "Double")
(object ClassAttribute "mblnEnabled"
quid "4A99929000CF"
type "Boolean")
(object ClassAttribute "DefaultMode"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "IsConst"
value TRUE))
quid "4A99929000E0"
type "Long"
initv "vrRunTimeInit"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "CtrlItem"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE)
(object Attribute
tool "Visual Basic"
name "OptionCompare"
value ("CompareSet" 203)))
quid "4A99929003AE"
stereotype "Class Module"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A99929003CD"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IContainer"
quidu "4A9992930014"))
operations (list Operations
(object Operation "Init"
quid "4A9992910025"
parameters (list Parameters
(object Parameter "ByVal parent"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A9992910034"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "GetCtrlIndex"
quid "4A9992910035"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
result "Variant"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "AnalyzeCtrl"
quid "4A9992910044"
documentation " 分析控件,提取位置信息"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Match"
quid "4A9992910052"
documentation " 控件是否和当前控件信息相匹配"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
result "Boolean"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "LogCtrlInfo"
quid "4A9992910054"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "Resize"
quid "4A9992910063"
documentation " 开始调整控件,这个是核心函数"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control")
(object Parameter "ByVal Container"
type "Object")
(object Parameter "ByVal InitContainer"
type "IContainer"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Info"
quid "4A9992910074"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "String"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Info"
quid "4A9992910082"
documentation " 保存/读取字符串属性信息"
stereotype "Get"
result "String"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "IContainer_InitHeight"
quid "4A9992910091"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IContainer_InitHeight"
quid "4A9992910092"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IContainer_InitWidth"
quid "4A99929100A1"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IContainer_InitWidth"
quid "4A99929100B0"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mstrName"
quid "4A99929003DD"
type "String")
(object ClassAttribute "mstrType"
quid "4A99929003DE"
type "String")
(object ClassAttribute "mlngIndex"
quid "4A99929003DF"
type "Long")
(object ClassAttribute "mdblInitLeft"
quid "4A9992910004"
type "Double")
(object ClassAttribute "mdblInitTop"
quid "4A9992910005"
type "Double")
(object ClassAttribute "mdblInitWidth"
quid "4A9992910014"
type "Double")
(object ClassAttribute "mdblInitHeight"
quid "4A9992910015"
type "Double")
(object ClassAttribute "mobjParent"
quid "4A9992910024"
type "Object"
exportControl "Public"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "CtrlItemCollection"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A999291011E"
stereotype "Class Module"
operations (list Operations
(object Operation "Init"
quid "4A999291014E"
parameters (list Parameters
(object Parameter "ByVal parent"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A999291015D"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Add"
quid "4A999291015E"
result "CtrlItem"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Remove"
quid "4A999291016C"
parameters (list Parameters
(object Parameter "ByVal Index"
type "Variant"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "RemoveAll"
quid "4A999291016E"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Count"
quid "4A999291016F"
stereotype "Get"
result "Long"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "SearchItem"
quid "4A999291017B"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
result "CtrlItem"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Item"
quid "4A999291017D"
stereotype "Get"
parameters (list Parameters
(object Parameter "ByVal Index"
type "Variant"))
result "CtrlItem"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "NewEnum"
quid "4A999291018C"
result "IUnknown"
concurrency "Sequential"
opExportControl "Public"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mobjParent"
quid "4A999291014C"
type "Object"
exportControl "Public")
(object ClassAttribute "mCol"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A999291014D"
type "Collection"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "FormEventSource"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A99929101BA"
stereotype "Class Module"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A99929101E9"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventSource"
quidu "4A9992930035"))
operations (list Operations
(object Operation "mobjForm_Resize"
quid "4A99929101F8"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IEventSource_Init"
quid "4A99929101F9"
parameters (list Parameters
(object Parameter "ByVal obj"
type "Object")
(object Parameter "ByVal target"
type "IEventTarget"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IEventSource_TearDown"
quid "4A99929101FC"
concurrency "Sequential"
opExportControl "Private"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "frmAbout"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A9992910227"
stereotype "Form"
operations (list Operations
(object Operation "cmdOK_Click"
quid "4A9992910246"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "Form_Load"
quid "4A9992910256"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "lblDisclaimer_Click"
quid "4A9992910257"
concurrency "Sequential"
opExportControl "Private"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "CtrlFilter"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A9992910295"
stereotype "Class Module"
operations (list Operations
(object Operation "CanResize"
quid "4A99929102C3"
documentation " 判断是否为运行时可以调整大小的控件"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
result "Boolean"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "IsSupportedControl"
quid "4A99929102C5"
documentation " 必须支持Left,Top,Width,Height属性"
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control"))
result "Boolean"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "IsPropGetValid"
quid "4A99929102D3"
documentation " 判断控件是否存在某个属性"
parameters (list Parameters
(object Parameter "ByVal obj"
type "Object")
(object Parameter "ByVal PropName"
type "String"))
result "Boolean"
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class_Utility "ModUtil"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A99929102F2"
stereotype "Module"
operations (list Operations
(object Operation "Max"
quid "4A9992910331"
parameters (list Parameters
(object Parameter "ParamArray arg()"
type "Variant"))
result "Variant"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Min"
quid "4A9992910333"
parameters (list Parameters
(object Parameter "ParamArray arg()"
type "Variant"))
result "Variant"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "GenErr"
quid "4A9992910340"
documentation " 抛出错误"
parameters (list Parameters
(object Parameter "ByVal description"
type "String"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "GetErrStr"
quid "4A9992910350"
documentation " 获取错误描述字符串"
result "String"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ShowErr"
quid "4A9992910351"
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "PictureBoxEventSource"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A999291036F"
stereotype "Class Module"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A999291039E"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventSource"
quidu "4A9992930035"))
operations (list Operations
(object Operation "mobjPictureBox_Resize"
quid "4A99929103B1"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IEventSource_Init"
quid "4A99929103B2"
parameters (list Parameters
(object Parameter "ByVal obj"
type "Object")
(object Parameter "ByVal target"
type "IEventTarget"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IEventSource_TearDown"
quid "4A99929103BE"
concurrency "Sequential"
opExportControl "Private"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "EventSourceCollection"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A99929103DD"
stereotype "Class Module"
operations (list Operations
(object Operation "Init"
quid "4A9992920033"
parameters (list Parameters
(object Parameter "ByVal parent"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A9992920035"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Item"
quid "4A9992920043"
stereotype "Get"
parameters (list Parameters
(object Parameter "ByVal Index"
type "Variant"))
result "IEventSource"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Remove"
quid "4A9992920045"
parameters (list Parameters
(object Parameter "ByVal Index"
type "Variant"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "RemoveAll"
quid "4A9992920052"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Count"
quid "4A9992920053"
stereotype "Get"
result "Long"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Add"
quid "4A9992920054"
parameters (list Parameters
(object Parameter "ByVal es"
type "IEventSource"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "NewEnum"
quid "4A9992920063"
result "IUnknown"
concurrency "Sequential"
opExportControl "Public"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mCol"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A9992920024"
type "Collection")
(object ClassAttribute "mobjParent"
quid "4A9992920025"
type "Object"
exportControl "Public"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "DesignModeWorker"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A9992920091"
stereotype "Class Module"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A99929200C0"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker"
quidu "4A9992930093"))
operations (list Operations
(object Operation "IModeWorker_GetInitPositons"
quid "4A99929200D2"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_Init"
quid "4A99929200D3"
parameters (list Parameters
(object Parameter "ByVal sp"
type "ISettingProvider"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_InitProperties"
quid "4A99929200DF"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_ReadProperties"
quid "4A99929200E0"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "Object"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_ResizeAll"
quid "4A99929200E2"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_TearDown"
quid "4A99929200EF"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_WriteProperties"
quid "4A99929200F0"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "Object"))
concurrency "Sequential"
opExportControl "Private"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "UserModeWorker"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A999292011E"
stereotype "Class Module"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A999292014C"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker"
quidu "4A9992930093")
(object Inheritance_Relationship
quid "4A999292014D"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget"
quidu "4A9992930065"))
operations (list Operations
(object Operation "IEventTarget_Resize"
quid "4A999292015F"
documentation " 执行调整操作"
parameters (list Parameters
(object Parameter "ByVal src"
type "Object"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_GetInitPositons"
quid "4A9992920161"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_Init"
quid "4A999292016C"
parameters (list Parameters
(object Parameter "ByVal sp"
type "ISettingProvider"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_InitProperties"
quid "4A999292016E"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_ReadProperties"
quid "4A999292016F"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "Object"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_ResizeAll"
quid "4A999292017C"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_TearDown"
quid "4A999292017D"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IModeWorker_WriteProperties"
quid "4A999292018B"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "Object"))
concurrency "Sequential"
opExportControl "Private"
uid 0))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "CtrlItemManager"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A99929201D9"
stereotype "Class Module"
operations (list Operations
(object Operation "Init"
quid "4A9992920237"
parameters (list Parameters
(object Parameter "ByVal parent"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A9992920239"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "GetInitialPositions"
quid "4A999292023A"
documentation " 获取指定窗口中控件的初始位置"
parameters (list Parameters
(object Parameter "ByVal f"
type "Form"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ResizeForm"
quid "4A9992920246"
documentation " 调整窗体大小"
parameters (list Parameters
(object Parameter "ByVal sp"
type "ISettingProvider"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ResizeSubControls"
quid "4A9992920248"
documentation " 调整子控件控件位置/大小"
parameters (list Parameters
(object Parameter "ByVal f"
type "Form")
(object Parameter "ByVal src"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ResizeControl"
quid "4A9992920256"
documentation
| 调整控件,方式1
| 遍历所有控件,如果控件的容器是Form或者没有Container属性
| 则用Form调整,如果有容器,且存在容器信息,则用该容器调整
parameters (list Parameters
(object Parameter "ByVal f"
type "Form")
(object Parameter "ByVal ctrl"
type "Control"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "ResizeControl2"
quid "4A9992920259"
documentation
| 调整控件,方式2
| 如果控件的容器就是参数中指定的容器,那么就进行调整
parameters (list Parameters
(object Parameter "ByVal ctrl"
type "Control")
(object Parameter "ByVal src"
type "Object"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "WriteProperties"
quid "4A9992920275"
documentation " 保存控件信息"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "PropertyBag"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ReadProperties"
quid "4A9992920277"
documentation " 读取控件信息"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "PropertyBag"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "InitProperties"
quid "4A9992920285"
documentation " 初始化控件信息"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "GenKey"
quid "4A9992920286"
documentation " 根据序号生成属性名称"
parameters (list Parameters
(object Parameter "ByVal i"
type "Long"))
result "String"
concurrency "Sequential"
opExportControl "Private"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mobjParent"
quid "4A9992920227"
type "Object"
exportControl "Public"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "EventSourceManager"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A99929202C3"
stereotype "Class Module"
operations (list Operations
(object Operation "Init"
quid "4A9992920321"
parameters (list Parameters
(object Parameter "ByVal parent"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A9992920323"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "AddForm"
quid "4A9992920331"
parameters (list Parameters
(object Parameter "ByVal src"
type "Form")
(object Parameter "ByVal target"
type "IEventTarget"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "AddPictureBox"
quid "4A9992920334"
parameters (list Parameters
(object Parameter "ByVal src"
type "PictureBox")
(object Parameter "ByVal target"
type "IEventTarget"))
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "AddEventSource"
quid "4A9992920340"
documentation " 添加事件源"
parameters (list Parameters
(object Parameter "ByVal f"
type "Form")
(object Parameter "ByVal target"
type "IEventTarget"))
concurrency "Sequential"
opExportControl "Public"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mobjParent"
quid "4A9992920312"
type "Object"
exportControl "Public"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Class "FormInfo"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE))
quid "4A999292036F"
stereotype "Class Module"
superclasses (list inheritance_relationship_list
(object Inheritance_Relationship
quid "4A999292039E"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IContainer"
quidu "4A9992930014"))
operations (list Operations
(object Operation "Info"
quid "4A99929203AF"
stereotype "Let"
parameters (list Parameters
(object Parameter "ByVal v"
type "String"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Info"
quid "4A99929203BD"
documentation " 保存/读取字符串属性信息"
stereotype "Get"
result "String"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "IContainer_InitHeight"
quid "4A99929203BE"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0)
(object Operation "IContainer_InitWidth"
quid "4A99929203BF"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Private"
uid 0))
class_attributes (list class_attribute_list
(object ClassAttribute "mdblInitFormWidth"
quid "4A999292039F"
type "Double"
exportControl "Public")
(object ClassAttribute "mdblInitFormHeight"
quid "4A99929203AE"
type "Double"
exportControl "Public"))
module "Component View::VB6ResizerLib"
quidu "4A9992900004"
language "Visual Basic")
(object Association "$UNNAMED$0"
quid "4A99929000D0"
roles (list role_list
(object Role "$UNNAMED$1"
quid "4A99929000D1"
supplier "Logical View::控件程序说明::VB6Resizer"
quidu "4A9992900072")
(object Role "menumMode"
quid "4A99929000DF"
label "menumMode"
supplier "vrMode"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$2"
quid "4A99929000EF"
roles (list role_list
(object Role "$UNNAMED$3"
quid "4A99929000F0"
supplier "Logical View::控件程序说明::VB6Resizer"
quidu "4A9992900072")
(object Role "mobjModeWorker"
quid "4A99929000F1"
label "mobjModeWorker"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker"
quidu "4A9992930093"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$4"
quid "4A99929101EA"
roles (list role_list
(object Role "$UNNAMED$5"
quid "4A99929101EB"
supplier "Logical View::控件程序说明::FormEventSource"
quidu "4A99929101BA")
(object Role "mobjTarget"
quid "4A99929101EC"
label "mobjTarget"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget"
quidu "4A9992930065"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$6"
quid "4A99929101ED"
roles (list role_list
(object Role "$UNNAMED$7"
quid "4A99929101EE"
supplier "Logical View::控件程序说明::FormEventSource"
quidu "4A99929101BA")
(object Role "mobjForm"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "WithEvents"
value TRUE))
quid "4A99929101EF"
label "mobjForm"
supplier "Form"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$8"
quid "4A9992910258"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$9"
quid "4A9992910259"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "picIcon"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value FALSE))
quid "4A999291025A"
label "picIcon"
supplier "PictureBox"
is_navigable TRUE)))
(object Association "$UNNAMED$10"
quid "4A9992910266"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$11"
quid "4A9992910267"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "cmdOK"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value FALSE))
quid "4A9992910268"
label "cmdOK"
supplier "CommandButton"
is_navigable TRUE)))
(object Association "$UNNAMED$12"
quid "4A9992910269"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$13"
quid "4A999291026A"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "Line1"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value TRUE))
quid "4A999291026B"
label "Line1"
supplier "Line"
is_navigable TRUE)))
(object Association "$UNNAMED$14"
quid "4A9992910275"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$15"
quid "4A9992910276"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "lblDescription"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value FALSE))
quid "4A9992910277"
label "lblDescription"
supplier "Label"
is_navigable TRUE)))
(object Association "$UNNAMED$16"
quid "4A9992910278"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$17"
quid "4A9992910279"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "lblTitle"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value FALSE))
quid "4A999291027A"
label "lblTitle"
supplier "Label"
is_navigable TRUE)))
(object Association "$UNNAMED$18"
quid "4A999291027B"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$19"
quid "4A999291027C"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "lblVersion"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value FALSE))
quid "4A999291027D"
label "lblVersion"
supplier "Label"
is_navigable TRUE)))
(object Association "$UNNAMED$20"
quid "4A9992910285"
stereotype "Contained Control"
roles (list role_list
(object Role "$UNNAMED$21"
quid "4A9992910286"
supplier "Logical View::控件程序说明::frmAbout"
quidu "4A9992910227"
is_aggregate TRUE)
(object Role "lblDisclaimer"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value FALSE))
quid "4A9992910287"
label "lblDisclaimer"
supplier "Label"
is_navigable TRUE)))
(object Association "$UNNAMED$22"
quid "4A9992910312"
roles (list role_list
(object Role "$UNNAMED$23"
quid "4A9992910313"
supplier "Logical View::控件程序说明::ModUtil"
quidu "4A99929102F2")
(object Role "gobjCtrlFilter"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A9992910314"
label "gobjCtrlFilter"
supplier "Logical View::控件程序说明::CtrlFilter"
quidu "4A9992910295"
is_navigable TRUE)))
(object Association "$UNNAMED$24"
quid "4A999291039F"
roles (list role_list
(object Role "$UNNAMED$25"
quid "4A99929103A0"
supplier "Logical View::控件程序说明::PictureBoxEventSource"
quidu "4A999291036F")
(object Role "mobjTarget"
quid "4A99929103A1"
label "mobjTarget"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget"
quidu "4A9992930065"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$26"
quid "4A99929103AE"
roles (list role_list
(object Role "$UNNAMED$27"
quid "4A99929103AF"
supplier "Logical View::控件程序说明::PictureBoxEventSource"
quidu "4A999291036F")
(object Role "mobjPictureBox"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "WithEvents"
value TRUE))
quid "4A99929103B0"
label "mobjPictureBox"
supplier "PictureBox"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$28"
quid "4A99929200C1"
roles (list role_list
(object Role "$UNNAMED$29"
quid "4A99929200C2"
supplier "Logical View::控件程序说明::DesignModeWorker"
quidu "4A9992920091")
(object Role "mobjCtrlItemMgr"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A99929200C3"
label "mobjCtrlItemMgr"
supplier "Logical View::控件程序说明::CtrlItemManager"
quidu "4A99929201D9"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$30"
quid "4A99929200CF"
roles (list role_list
(object Role "$UNNAMED$31"
quid "4A99929200D0"
supplier "Logical View::控件程序说明::DesignModeWorker"
quidu "4A9992920091")
(object Role "mobjSettingProvider"
quid "4A99929200D1"
label "mobjSettingProvider"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider"
quidu "4A99929300D2"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$32"
quid "4A999292014E"
roles (list role_list
(object Role "$UNNAMED$33"
quid "4A999292014F"
supplier "Logical View::控件程序说明::UserModeWorker"
quidu "4A999292011E")
(object Role "mobjCtrlItemMgr"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A9992920150"
label "mobjCtrlItemMgr"
supplier "Logical View::控件程序说明::CtrlItemManager"
quidu "4A99929201D9"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$34"
quid "4A9992920151"
roles (list role_list
(object Role "$UNNAMED$35"
quid "4A9992920152"
supplier "Logical View::控件程序说明::UserModeWorker"
quidu "4A999292011E")
(object Role "mobjEventSourceMgr"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A9992920153"
label "mobjEventSourceMgr"
supplier "Logical View::控件程序说明::EventSourceManager"
quidu "4A99929202C3"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$36"
quid "4A999292015C"
roles (list role_list
(object Role "$UNNAMED$37"
quid "4A999292015D"
supplier "Logical View::控件程序说明::UserModeWorker"
quidu "4A999292011E")
(object Role "mobjSettingProvider"
quid "4A999292015E"
label "mobjSettingProvider"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider"
quidu "4A99929300D2"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$38"
quid "4A9992920218"
roles (list role_list
(object Role "$UNNAMED$39"
quid "4A9992920219"
supplier "Logical View::控件程序说明::CtrlItemManager"
quidu "4A99929201D9")
(object Role "mobjFormInfo"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A999292021A"
label "mobjFormInfo"
supplier "Logical View::控件程序说明::FormInfo"
quidu "4A999292036F"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$40"
quid "4A999292021B"
roles (list role_list
(object Role "$UNNAMED$41"
quid "4A999292021C"
supplier "Logical View::控件程序说明::CtrlItemManager"
quidu "4A99929201D9")
(object Role "mcolCtrlItem"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A999292021D"
label "mcolCtrlItem"
supplier "Logical View::控件程序说明::CtrlItemCollection"
quidu "4A999291011E"
exportControl "Private"
is_navigable TRUE)))
(object Association "$UNNAMED$42"
quid "4A9992920302"
roles (list role_list
(object Role "$UNNAMED$43"
quid "4A9992920303"
supplier "Logical View::控件程序说明::EventSourceManager"
quidu "4A99929202C3")
(object Role "mcolEventSource"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value TRUE))
quid "4A9992920304"
label "mcolEventSource"
supplier "Logical View::控件程序说明::EventSourceCollection"
quidu "4A99929103DD"
exportControl "Private"
is_navigable TRUE)))
(object Class_Category "VB6ResizerInterfaces"
quid "4A9992930004"
exportControl "Public"
logical_models (list unit_reference_list
(object Class "IContainer"
quid "4A9992930014"
stereotype "Interface"
operations (list Operations
(object Operation "InitHeight"
quid "4A9992930033"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "InitWidth"
quid "4A9992930034"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerInterfaces"
quidu "4A99929203DD"
language "COM")
(object Class "IEventSource"
quid "4A9992930035"
stereotype "Interface"
operations (list Operations
(object Operation "Init"
quid "4A9992930052"
parameters (list Parameters
(object Parameter "ByVal src"
type "Object")
(object Parameter "ByRef target"
type "IEventTarget"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A9992930064"
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerInterfaces"
quidu "4A99929203DD"
language "COM")
(object Class "IEventTarget"
quid "4A9992930065"
stereotype "Interface"
operations (list Operations
(object Operation "Resize"
quid "4A9992930091"
parameters (list Parameters
(object Parameter "ByVal src"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerInterfaces"
quidu "4A99929203DD"
language "COM")
(object Class "IModeWorker"
quid "4A9992930093"
stereotype "Interface"
operations (list Operations
(object Operation "InitProperties"
quid "4A99929300C0"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ReadProperties"
quid "4A99929300C1"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "WriteProperties"
quid "4A99929300C3"
parameters (list Parameters
(object Parameter "ByVal PropBag"
type "Object"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "GetInitPositons"
quid "4A99929300C5"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "ResizeAll"
quid "4A99929300C6"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Init"
quid "4A99929300CF"
parameters (list Parameters
(object Parameter "ByRef sp"
type "ISettingProvider"))
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "TearDown"
quid "4A99929300D1"
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerInterfaces"
quidu "4A99929203DD"
language "COM")
(object Class "ISettingProvider"
quid "4A99929300D2"
stereotype "Interface"
operations (list Operations
(object Operation "Enabled"
quid "4A99929300FE"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MaxWidth"
quid "4A99929300FF"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MinWidth"
quid "4A9992930100"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MaxHeight"
quid "4A9992930101"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "MinHeight"
quid "4A999293010E"
stereotype "Get"
result "Double"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Mode"
quid "4A999293010F"
stereotype "Get"
result "Long"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "Form"
quid "4A9992930110"
stereotype "Get"
result "Object"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "UserMode"
quid "4A999293011E"
stereotype "Get"
result "Boolean"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "BeforeResize"
quid "4A999293011F"
concurrency "Sequential"
opExportControl "Public"
uid 0)
(object Operation "AfterResize"
quid "4A9992930120"
concurrency "Sequential"
opExportControl "Public"
uid 0))
module "Component View::VB6ResizerInterfaces"
quidu "4A99929203DD"
language "COM"))
logical_presentations (list unit_reference_list
(object ClassDiagram "Package Overview"
quid "4A9992930005"
title "Package Overview"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IContainer" @1
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (272, 128)
label (object ItemLabel
Parent_View @1
location (52, 57)
nlines 1
max_width 440
justify 0
label "IContainer")
stereotype (object ItemLabel
Parent_View @1
location (52, 10)
anchor 10
nlines 1
max_width 440
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930014"
width 458
height 258
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IEventSource" @2
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (720, 128)
label (object ItemLabel
Parent_View @2
location (584, 57)
nlines 1
max_width 272
justify 0
label "IEventSource")
stereotype (object ItemLabel
Parent_View @2
location (584, 10)
anchor 10
nlines 1
max_width 272
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930035"
width 290
height 258
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget" @3
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (272, 480)
label (object ItemLabel
Parent_View @3
location (136, 431)
nlines 1
max_width 272
justify 0
label "IEventTarget")
stereotype (object ItemLabel
Parent_View @3
location (136, 384)
anchor 10
nlines 1
max_width 272
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930065"
width 290
height 214
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker" @4
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (720, 480)
label (object ItemLabel
Parent_View @4
location (545, 299)
nlines 1
max_width 350
justify 0
label "IModeWorker")
stereotype (object ItemLabel
Parent_View @4
location (545, 252)
anchor 10
nlines 1
max_width 350
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930093"
width 368
height 478
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider" @5
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (272, 848)
label (object ItemLabel
Parent_View @5
location (48, 601)
nlines 1
max_width 448
justify 0
label "ISettingProvider")
stereotype (object ItemLabel
Parent_View @5
location (48, 554)
anchor 10
nlines 1
max_width 448
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A99929300D2"
width 466
height 610
annotation 8
autoResize TRUE))))))
logical_presentations (list unit_reference_list
(object ClassDiagram "Package Overview"
quid "4A99928F0341"
title "Package Overview"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Logical View::控件程序说明::VB6Resizer" @6
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (384, 960)
label (object ItemLabel
Parent_View @6
location (11, 53)
nlines 1
max_width 746
justify 0
label "VB6Resizer")
stereotype (object ItemLabel
Parent_View @6
location (11, 6)
anchor 10
nlines 1
max_width 746
justify 0
label "<<User Control>>")
icon_style "Icon"
quidu "4A9992900072"
width 764
height 1930
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::CtrlItem" @7
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (320, 544)
label (object ItemLabel
Parent_View @7
location (2, 55)
nlines 1
max_width 636
justify 0
label "CtrlItem")
stereotype (object ItemLabel
Parent_View @7
location (2, 8)
anchor 10
nlines 1
max_width 636
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929003AE"
width 654
height 1094
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::FormEventSource" @8
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (816, 480)
label (object ItemLabel
Parent_View @8
location (559, 387)
nlines 1
max_width 514
justify 0
label "FormEventSource")
stereotype (object ItemLabel
Parent_View @8
location (559, 340)
anchor 10
nlines 1
max_width 514
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929101BA"
width 532
height 302
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::frmAbout" @9
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (272, 848)
label (object ItemLabel
Parent_View @9
location (85, 755)
nlines 1
max_width 374
justify 0
label "frmAbout")
stereotype (object ItemLabel
Parent_View @9
location (85, 708)
anchor 10
nlines 1
max_width 374
justify 0
label "<<Form>>")
icon_style "Icon"
quidu "4A9992910227"
width 392
height 302
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::CtrlFilter" @10
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (720, 848)
label (object ItemLabel
Parent_View @10
location (513, 755)
nlines 1
max_width 414
justify 0
label "CtrlFilter")
stereotype (object ItemLabel
Parent_View @10
location (513, 708)
anchor 10
nlines 1
max_width 414
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A9992910295"
width 432
height 302
annotation 8
autoResize TRUE)
(object ClassView "ClassUtility" "Logical View::控件程序说明::ModUtil" @11
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1264, 848)
label (object ItemLabel
Parent_View @11
location (1142, 711)
nlines 1
max_width 244
justify 0
label "ModUtil")
stereotype (object ItemLabel
Parent_View @11
location (1142, 664)
anchor 10
nlines 1
max_width 244
justify 0
label "<<Module>>")
icon_style "Icon"
quidu "4A99929102F2"
width 262
height 390
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$22" @12
location (1034, 848)
stereotype TRUE
quidu "4A9992910312"
roleview_list (list RoleViews
(object RoleView "gobjCtrlFilter" @13
Parent_View @12
location (-230, 0)
label (object SegLabel @14
Parent_View @13
location (957, 807)
anchor 1
anchor_loc 1
nlines 1
max_width 240
justify 0
label "+gobjCtrlFilter"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992910314"
client @12
supplier @10
line_style 0)
(object RoleView "$UNNAMED$23" @15
Parent_View @12
location (-230, 0)
label (object SegLabel @16
Parent_View @15
location (1111, 807)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992910313"
client @12
supplier @11
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::PictureBoxEventSource" @17
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1344, 144)
label (object ItemLabel
Parent_View @17
location (1087, 51)
nlines 1
max_width 514
justify 0
label "PictureBoxEventSource")
stereotype (object ItemLabel
Parent_View @17
location (1087, 4)
anchor 10
nlines 1
max_width 514
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999291036F"
width 532
height 302
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::EventSourceCollection" @18
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1344, 480)
label (object ItemLabel
Parent_View @18
location (1136, 233)
nlines 1
max_width 416
justify 0
label "EventSourceCollection")
stereotype (object ItemLabel
Parent_View @18
location (1136, 186)
anchor 10
nlines 1
max_width 416
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929103DD"
width 434
height 610
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::EventSourceManager" @19
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (2336, 480)
label (object ItemLabel
Parent_View @19
location (2135, 321)
nlines 1
max_width 402
justify 0
label "EventSourceManager")
stereotype (object ItemLabel
Parent_View @19
location (2135, 274)
anchor 10
nlines 1
max_width 402
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929202C3"
width 420
height 434
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$42" @20
location (1843, 480)
stereotype TRUE
quidu "4A9992920302"
roleview_list (list RoleViews
(object RoleView "mcolEventSource" @21
Parent_View @20
location (-493, 0)
label (object SegLabel @22
Parent_View @21
location (1618, 439)
anchor 1
anchor_loc 1
nlines 1
max_width 324
justify 0
label "-mcolEventSource"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920304"
client @20
supplier @18
line_style 0)
(object RoleView "$UNNAMED$43" @23
Parent_View @20
location (-493, 0)
label (object SegLabel @24
Parent_View @23
location (2068, 439)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920303"
client @20
supplier @19
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::DesignModeWorker" @25
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1520, 1024)
label (object ItemLabel
Parent_View @25
location (1219, 843)
nlines 1
max_width 602
justify 0
label "DesignModeWorker")
stereotype (object ItemLabel
Parent_View @25
location (1219, 796)
anchor 10
nlines 1
max_width 602
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A9992920091"
width 620
height 478
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::UserModeWorker" @26
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1888, 256)
label (object ItemLabel
Parent_View @26
location (1587, 53)
nlines 1
max_width 602
justify 0
label "UserModeWorker")
stereotype (object ItemLabel
Parent_View @26
location (1587, 6)
anchor 10
nlines 1
max_width 602
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292011E"
width 620
height 522
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$34" @27
location (2161, 392)
stereotype TRUE
quidu "4A9992920151"
roleview_list (list RoleViews
(object RoleView "mobjEventSourceMgr" @28
Parent_View @27
location (273, 264)
label (object SegLabel @29
Parent_View @28
location (1709, 274)
anchor 1
anchor_loc 1
nlines 1
max_width 384
justify 0
label "-mobjEventSourceMgr"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920153"
client @27
supplier @19
line_style 0)
(object RoleView "$UNNAMED$35" @30
Parent_View @27
location (273, 264)
label (object SegLabel @31
Parent_View @30
location (1751, 354)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920152"
client @27
supplier @26
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::CtrlItemCollection" @32
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (816, 320)
label (object ItemLabel
Parent_View @32
location (615, 51)
nlines 1
max_width 402
justify 0
label "CtrlItemCollection")
stereotype (object ItemLabel
Parent_View @32
location (615, 4)
anchor 10
nlines 1
max_width 402
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999291011E"
width 420
height 654
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::FormInfo" @33
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (2256, 848)
label (object ItemLabel
Parent_View @33
location (1938, 689)
nlines 1
max_width 636
justify 0
label "FormInfo")
stereotype (object ItemLabel
Parent_View @33
location (1938, 642)
anchor 10
nlines 1
max_width 636
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292036F"
width 654
height 434
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::CtrlItemManager" @34
ShowCompartmentStereotypes TRUE
IncludeAttribute TRUE
IncludeOperation TRUE
location (1888, 480)
label (object ItemLabel
Parent_View @34
location (1687, 189)
nlines 1
max_width 402
justify 0
label "CtrlItemManager")
stereotype (object ItemLabel
Parent_View @34
location (1687, 142)
anchor 10
nlines 1
max_width 402
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929201D9"
width 420
height 698
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$28" @35
location (1679, 787)
stereotype TRUE
quidu "4A99929200C1"
roleview_list (list RoleViews
(object RoleView "mobjCtrlItemMgr" @36
Parent_View @35
location (-33, -61)
label (object SegLabel @37
Parent_View @36
location (1679, 787)
anchor 1
anchor_loc 1
nlines 1
max_width 300
justify 0
label "-mobjCtrlItemMgr"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929200C3"
client @35
supplier @34
line_style 0)
(object RoleView "$UNNAMED$29" @38
Parent_View @35
location (-33, -61)
label (object SegLabel @39
Parent_View @38
location (1679, 787)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A99929200C2"
client @35
supplier @25
line_style 0)))
(object AssociationViewNew "$UNNAMED$32" @40
location (1888, 368)
stereotype TRUE
quidu "4A999292014E"
roleview_list (list RoleViews
(object RoleView "mobjCtrlItemMgr" @41
Parent_View @40
location (0, 240)
label (object SegLabel @42
Parent_View @41
location (1672, 335)
anchor 1
anchor_loc 1
nlines 1
max_width 300
justify 0
label "-mobjCtrlItemMgr"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920150"
client @40
supplier @34
line_style 0)
(object RoleView "$UNNAMED$33" @43
Parent_View @40
location (0, 240)
label (object SegLabel @44
Parent_View @43
location (1520, 373)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A999292014F"
client @40
supplier @26
line_style 0)))
(object AssociationViewNew "$UNNAMED$40" @45
location (1351, 399)
stereotype TRUE
quidu "4A999292021B"
roleview_list (list RoleViews
(object RoleView "mcolCtrlItem" @46
Parent_View @45
location (-537, -81)
label (object SegLabel @47
Parent_View @46
location (1097, 319)
anchor 1
anchor_loc 1
nlines 1
max_width 240
justify 0
label "-mcolCtrlItem"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A999292021D"
client @45
supplier @32
line_style 0)
(object RoleView "$UNNAMED$41" @48
Parent_View @45
location (-537, -81)
label (object SegLabel @49
Parent_View @48
location (1618, 396)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A999292021C"
client @45
supplier @34
line_style 0)))
(object AssociationViewNew "$UNNAMED$38" @50
location (2068, 660)
stereotype TRUE
quidu "4A9992920218"
roleview_list (list RoleViews
(object RoleView "mobjFormInfo" @51
Parent_View @50
location (180, 180)
label (object SegLabel @52
Parent_View @51
location (1644, 545)
anchor 1
anchor_loc 1
nlines 1
max_width 252
justify 0
label "-mobjFormInfo"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A999292021A"
client @50
supplier @33
line_style 0)
(object RoleView "$UNNAMED$39" @53
Parent_View @50
location (180, 180)
label (object SegLabel @54
Parent_View @53
location (1691, 489)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920219"
client @50
supplier @34
line_style 0)))
(object CategoryView "Logical View::控件程序说明::VB6ResizerInterfaces" @55
location (2848, 960)
label (object ItemLabel
Parent_View @55
location (2704, 876)
nlines 2
max_width 288
justify 0
label "VB6ResizerInterfaces")
icon_style "Icon"
quidu "4A9992930004"
width 300
height 180)))
(object ClassDiagram "监视事件"
quid "4A9992A90321"
title "监视事件"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IEventSource" @56
ShowCompartmentStereotypes TRUE
location (1328, 448)
label (object ItemLabel
Parent_View @56
location (1135, 404)
nlines 1
max_width 386
justify 0
label "IEventSource")
stereotype (object ItemLabel
Parent_View @56
location (1135, 357)
anchor 10
nlines 1
max_width 386
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930035"
width 404
height 204
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::EventSourceCollection" @57
ShowCompartmentStereotypes TRUE
location (592, 432)
label (object ItemLabel
Parent_View @57
location (384, 409)
nlines 1
max_width 416
justify 0
label "EventSourceCollection")
stereotype (object ItemLabel
Parent_View @57
location (384, 362)
anchor 10
nlines 1
max_width 416
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929103DD"
width 434
height 162
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::EventSourceManager" @58
ShowCompartmentStereotypes TRUE
location (592, 832)
label (object ItemLabel
Parent_View @58
location (393, 809)
nlines 1
max_width 398
justify 0
label "EventSourceManager")
stereotype (object ItemLabel
Parent_View @58
location (393, 762)
anchor 10
nlines 1
max_width 398
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929202C3"
width 416
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$42" @59
location (592, 631)
stereotype TRUE
quidu "4A9992920302"
roleview_list (list RoleViews
(object RoleView "mcolEventSource" @60
Parent_View @59
location (144, -233)
label (object SegLabel @61
Parent_View @60
location (551, 537)
anchor 1
anchor_loc 1
nlines 1
max_width 312
justify 0
label "-mcolEventSource"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920304"
client @59
supplier @57
line_style 0)
(object RoleView "$UNNAMED$43" @62
Parent_View @59
location (144, -233)
label (object SegLabel @63
Parent_View @62
location (551, 726)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920303"
client @59
supplier @58
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::UserModeWorker" @64
ShowCompartmentStereotypes TRUE
location (592, 1264)
label (object ItemLabel
Parent_View @64
location (429, 1241)
nlines 1
max_width 326
justify 0
label "UserModeWorker")
stereotype (object ItemLabel
Parent_View @64
location (429, 1194)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292011E"
width 344
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$34" @65
location (592, 1047)
stereotype TRUE
quidu "4A9992920151"
roleview_list (list RoleViews
(object RoleView "mobjEventSourceMgr" @66
Parent_View @65
location (32, 727)
label (object SegLabel @67
Parent_View @66
location (634, 941)
anchor 1
anchor_loc 1
nlines 1
max_width 384
justify 0
label "-mobjEventSourceMgr"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920153"
client @65
supplier @58
line_style 0)
(object RoleView "$UNNAMED$35" @68
Parent_View @65
location (32, 727)
label (object SegLabel @69
Parent_View @68
location (634, 1155)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920152"
client @65
supplier @64
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::FormEventSource" @70
ShowCompartmentStereotypes TRUE
location (1568, 832)
label (object ItemLabel
Parent_View @70
location (1399, 809)
nlines 1
max_width 338
justify 0
label "FormEventSource")
stereotype (object ItemLabel
Parent_View @70
location (1399, 762)
anchor 10
nlines 1
max_width 338
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929101BA"
width 356
height 162
annotation 8
autoResize TRUE)
(object InheritView "" @71
stereotype TRUE
quidu "4A99929101E9"
client @70
supplier @56
line_style 0)
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget" @72
ShowCompartmentStereotypes TRUE
location (1312, 1264)
label (object ItemLabel
Parent_View @72
location (1119, 1220)
nlines 1
max_width 386
justify 0
label "IEventTarget")
stereotype (object ItemLabel
Parent_View @72
location (1119, 1173)
anchor 10
nlines 1
max_width 386
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930065"
width 404
height 204
annotation 8
autoResize TRUE)
(object InheritView "" @73
stereotype TRUE
quidu "4A999292014D"
client @64
supplier @72
line_style 0)
(object AssociationViewNew "$UNNAMED$4" @74
location (1446, 1037)
stereotype TRUE
quidu "4A99929101EA"
roleview_list (list RoleViews
(object RoleView "mobjTarget" @75
Parent_View @74
location (-298, -99)
label (object SegLabel @76
Parent_View @75
location (1351, 1115)
anchor 1
anchor_loc 1
nlines 1
max_width 216
justify 0
label "-mobjTarget"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A99929101EC"
client @74
supplier @72
line_style 0)
(object RoleView "$UNNAMED$5" @77
Parent_View @74
location (-298, -99)
label (object SegLabel @78
Parent_View @77
location (1468, 918)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929101EB"
client @74
supplier @70
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::PictureBoxEventSource" @79
ShowCompartmentStereotypes TRUE
location (1072, 832)
label (object ItemLabel
Parent_View @79
location (854, 809)
nlines 1
max_width 436
justify 0
label "PictureBoxEventSource")
stereotype (object ItemLabel
Parent_View @79
location (854, 762)
anchor 10
nlines 1
max_width 436
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999291036F"
width 454
height 162
annotation 8
autoResize TRUE)
(object InheritView "" @80
stereotype TRUE
quidu "4A999291039E"
client @79
supplier @56
line_style 0)
(object AssociationViewNew "$UNNAMED$24" @81
location (1185, 1037)
stereotype TRUE
quidu "4A999291039F"
roleview_list (list RoleViews
(object RoleView "mobjTarget" @82
Parent_View @81
location (-15, -99)
label (object SegLabel @83
Parent_View @82
location (1204, 1157)
anchor 1
anchor_loc 1
nlines 1
max_width 216
justify 0
label "-mobjTarget"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A99929103A1"
client @81
supplier @72
line_style 0)
(object RoleView "$UNNAMED$25" @84
Parent_View @81
location (-15, -99)
label (object SegLabel @85
Parent_View @84
location (1094, 957)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929103A0"
client @81
supplier @79
line_style 0)))
(object NoteView @86
location (832, 176)
label (object ItemLabel
Parent_View @86
location (525, 64)
nlines 5
max_width 578
label "事件源监视器集合包含了全部注册过的事件源,比如可以监视Form对象和它上边的PictureBox对象Resize事件的监视器")
width 638
height 237)
(object AttachView "" @87
stereotype TRUE
client @86
supplier @57
line_style 0)
(object AttachView "" @88
stereotype TRUE
client @86
supplier @56
line_style 0)
(object NoteView @89
location (208, 672)
label (object ItemLabel
Parent_View @89
location (67, 585)
nlines 4
max_width 246
label "此对象负责添加和管理事件源监视器")
width 306
height 187)
(object AttachView "" @90
stereotype TRUE
client @89
supplier @58
line_style 0)
(object NoteView @91
location (1792, 592)
label (object ItemLabel
Parent_View @91
location (1651, 530)
nlines 2
max_width 246
label "目前支持两种事件源")
width 306
height 137)
(object AttachView "" @92
stereotype TRUE
client @91
supplier @79
line_style 0)
(object AttachView "" @93
stereotype TRUE
client @91
supplier @70
line_style 0)
(object NoteView @94
location (1632, 160)
label (object ItemLabel
Parent_View @94
location (1419, 79)
nlines 3
max_width 390
label "事件源监视器接口,通过此接口来初始化,拆解事件源监视器")
width 450
height 175)
(object AttachView "" @95
stereotype TRUE
client @94
supplier @56
line_style 0)
(object NoteView @96
location (1792, 1152)
label (object ItemLabel
Parent_View @96
location (1576, 974)
nlines 8
max_width 396
label "事件源监视器包含了一个实现了IEventTarget接口的对象的指针,用于在接收到事件的时候调用此接口的函数通知接收方")
width 456
height 368)
(object NoteView @97
location (592, 1584)
label (object ItemLabel
Parent_View @97
location (348, 1481)
nlines 4
max_width 452
label "这个程序中的事件目标是用户模式的工作者,它负责接收事件并执行相应的操作")
width 512
height 219)
(object AttachView "" @98
stereotype TRUE
client @74
supplier @96
line_style 0)
(object AttachView "" @99
stereotype TRUE
client @81
supplier @96
line_style 0)
(object NoteView @100
location (1312, 1600)
label (object ItemLabel
Parent_View @100
location (1043, 1509)
nlines 4
max_width 502
label "事件目标接口指针,实现了此接口的对象可以接收到事件源监视器的通知")
width 562
height 194)
(object AttachView "" @101
stereotype TRUE
client @100
supplier @72
line_style 0)
(object AttachView "" @102
stereotype TRUE
client @64
supplier @97
line_style 0)
(object NoteView @103
location (224, 1040)
label (object ItemLabel
Parent_View @103
location (52, 912)
nlines 5
max_width 309
label "用户模式的工作者在适当的时机可以调用事件源管理器来执行注册并绑定事件源的操作")
width 369
height 269)
(object AttachView "" @104
stereotype TRUE
client @103
supplier @65
line_style 0)))
(object ClassDiagram "管理控件"
quid "4A9992B6010E"
title "管理控件"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Logical View::控件程序说明::CtrlItem" @105
ShowCompartmentStereotypes TRUE
location (1408, 512)
label (object ItemLabel
Parent_View @105
location (1245, 489)
nlines 1
max_width 326
justify 0
label "CtrlItem")
stereotype (object ItemLabel
Parent_View @105
location (1245, 442)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929003AE"
width 344
height 162
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::CtrlItemCollection" @106
ShowCompartmentStereotypes TRUE
location (864, 512)
label (object ItemLabel
Parent_View @106
location (696, 489)
nlines 1
max_width 336
justify 0
label "CtrlItemCollection")
stereotype (object ItemLabel
Parent_View @106
location (696, 442)
anchor 10
nlines 1
max_width 336
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999291011E"
width 354
height 162
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::FormInfo" @107
ShowCompartmentStereotypes TRUE
location (1408, 896)
label (object ItemLabel
Parent_View @107
location (1245, 873)
nlines 1
max_width 326
justify 0
label "FormInfo")
stereotype (object ItemLabel
Parent_View @107
location (1245, 826)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292036F"
width 344
height 162
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::DesignModeWorker" @108
ShowCompartmentStereotypes TRUE
location (560, 1344)
label (object ItemLabel
Parent_View @108
location (378, 1321)
nlines 1
max_width 364
justify 0
label "DesignModeWorker")
stereotype (object ItemLabel
Parent_View @108
location (378, 1274)
anchor 10
nlines 1
max_width 364
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A9992920091"
width 382
height 162
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::CtrlItemManager" @109
ShowCompartmentStereotypes TRUE
location (864, 896)
label (object ItemLabel
Parent_View @109
location (701, 873)
nlines 1
max_width 326
justify 0
label "CtrlItemManager")
stereotype (object ItemLabel
Parent_View @109
location (701, 826)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929201D9"
width 344
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$40" @110
location (864, 703)
stereotype TRUE
quidu "4A999292021B"
roleview_list (list RoleViews
(object RoleView "mcolCtrlItem" @111
Parent_View @110
location (160, -385)
label (object SegLabel @112
Parent_View @111
location (823, 615)
anchor 1
anchor_loc 1
nlines 1
max_width 228
justify 0
label "-mcolCtrlItem"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A999292021D"
client @110
supplier @106
line_style 0)
(object RoleView "$UNNAMED$41" @113
Parent_View @110
location (160, -385)
label (object SegLabel @114
Parent_View @113
location (823, 791)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A999292021C"
client @110
supplier @109
line_style 0)))
(object AssociationViewNew "$UNNAMED$38" @115
location (1135, 896)
stereotype TRUE
quidu "4A9992920218"
roleview_list (list RoleViews
(object RoleView "mobjFormInfo" @116
Parent_View @115
location (415, -176)
label (object SegLabel @117
Parent_View @116
location (1215, 855)
anchor 1
anchor_loc 1
nlines 1
max_width 252
justify 0
label "-mobjFormInfo"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A999292021A"
client @115
supplier @107
line_style 0)
(object RoleView "$UNNAMED$39" @118
Parent_View @115
location (415, -176)
label (object SegLabel @119
Parent_View @118
location (1057, 855)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920219"
client @115
supplier @109
line_style 0)))
(object AssociationViewNew "$UNNAMED$28" @120
location (711, 1119)
stereotype TRUE
quidu "4A99929200C1"
roleview_list (list RoleViews
(object RoleView "mobjCtrlItemMgr" @121
Parent_View @120
location (343, 159)
label (object SegLabel @122
Parent_View @121
location (753, 983)
anchor 1
anchor_loc 1
nlines 1
max_width 300
justify 0
label "-mobjCtrlItemMgr"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929200C3"
client @120
supplier @109
line_style 0)
(object RoleView "$UNNAMED$29" @123
Parent_View @120
location (343, 159)
label (object SegLabel @124
Parent_View @123
location (599, 1210)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A99929200C2"
client @120
supplier @108
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::UserModeWorker" @125
ShowCompartmentStereotypes TRUE
location (1248, 1328)
label (object ItemLabel
Parent_View @125
location (1085, 1305)
nlines 1
max_width 326
justify 0
label "UserModeWorker")
stereotype (object ItemLabel
Parent_View @125
location (1085, 1258)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292011E"
width 344
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$32" @126
location (1055, 1111)
stereotype TRUE
quidu "4A999292014E"
roleview_list (list RoleViews
(object RoleView "mobjCtrlItemMgr" @127
Parent_View @126
location (-305, -25)
label (object SegLabel @128
Parent_View @127
location (931, 1033)
anchor 1
anchor_loc 1
nlines 1
max_width 300
justify 0
label "-mobjCtrlItemMgr"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920150"
client @126
supplier @109
line_style 0)
(object RoleView "$UNNAMED$33" @129
Parent_View @126
location (-305, -25)
label (object SegLabel @130
Parent_View @129
location (1121, 1247)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A999292014F"
client @126
supplier @125
line_style 0)))
(object NoteView @131
location (320, 896)
label (object ItemLabel
Parent_View @131
location (85, 702)
nlines 8
max_width 434
label "此类提供了操作内存中保存的控件信息的各种方法,包括获取控件初始位置,保存控件信息到PropBag及从PropBag恢复,调整窗口,调整指定容器中的所有控件等等")
width 494
height 400)
(object NoteView @132
location (1088, 224)
label (object ItemLabel
Parent_View @132
location (844, 121)
nlines 4
max_width 452
label "CtrlItemCollection类保存了当前窗口中的有效控件的信息集合")
width 512
height 218)
(object AttachView "" @133
stereotype TRUE
client @131
supplier @109
line_style 0)
(object AttachView "" @134
stereotype TRUE
client @132
supplier @106
line_style 0)
(object AttachView "" @135
stereotype TRUE
client @132
supplier @105
line_style 0)
(object NoteView @136
location (1824, 512)
label (object ItemLabel
Parent_View @136
location (1639, 374)
nlines 6
max_width 334
label "Ctrl保存了控件的位置信息,提供了判断控件是否匹配以及根据容器信息调整控件的服务")
width 394
height 288)
(object AttachView "" @137
stereotype TRUE
client @136
supplier @105
line_style 0)
(object NoteView @138
location (1840, 912)
label (object ItemLabel
Parent_View @138
location (1646, 756)
nlines 7
max_width 352
label "窗体信息比较简单,只包括窗体初始的高度和宽度,作为一个容器,它和CtrlItem类一样,实现了IContainer接口")
width 412
height 325)
(object AttachView "" @139
stereotype TRUE
client @138
supplier @107
line_style 0)))
(object ClassDiagram "内部结构"
quid "4A9994A50347"
title "内部结构"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker" @140
ShowCompartmentStereotypes TRUE
location (672, 736)
label (object ItemLabel
Parent_View @140
location (479, 692)
nlines 1
max_width 386
justify 0
label "IModeWorker")
stereotype (object ItemLabel
Parent_View @140
location (479, 645)
anchor 10
nlines 1
max_width 386
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930093"
width 404
height 204
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::VB6Resizer" @141
ShowCompartmentStereotypes TRUE
location (992, 352)
label (object ItemLabel
Parent_View @141
location (830, 329)
nlines 1
max_width 324
justify 0
label "VB6Resizer")
stereotype (object ItemLabel
Parent_View @141
location (830, 282)
anchor 10
nlines 1
max_width 324
justify 0
label "<<User Control>>")
icon_style "Icon"
quidu "4A9992900072"
width 342
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$2" @142
location (840, 533)
stereotype TRUE
quidu "4A99929000EF"
roleview_list (list RoleViews
(object RoleView "mobjModeWorker" @143
Parent_View @142
location (-856, -123)
label (object SegLabel @144
Parent_View @143
location (740, 590)
anchor 1
anchor_loc 1
nlines 1
max_width 324
justify 0
label "-mobjModeWorker"
pctDist 0.828571
height 42
orientation 1)
stereotype TRUE
quidu "4A99929000F1"
client @142
supplier @140
line_style 0)
(object RoleView "$UNNAMED$3" @145
Parent_View @142
location (-856, -123)
label (object SegLabel @146
Parent_View @145
location (874, 427)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929000F0"
client @142
supplier @141
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::DesignModeWorker" @147
ShowCompartmentStereotypes TRUE
location (672, 1216)
label (object ItemLabel
Parent_View @147
location (490, 1193)
nlines 1
max_width 364
justify 0
label "DesignModeWorker")
stereotype (object ItemLabel
Parent_View @147
location (490, 1146)
anchor 10
nlines 1
max_width 364
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A9992920091"
width 382
height 162
annotation 8
autoResize TRUE)
(object InheritView "" @148
stereotype TRUE
quidu "4A99929200C0"
client @147
supplier @140
line_style 0)
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider" @149
ShowCompartmentStereotypes TRUE
location (1344, 736)
label (object ItemLabel
Parent_View @149
location (1151, 692)
nlines 1
max_width 386
justify 0
label "ISettingProvider")
stereotype (object ItemLabel
Parent_View @149
location (1151, 645)
anchor 10
nlines 1
max_width 386
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A99929300D2"
width 404
height 204
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$30" @150
location (992, 986)
stereotype TRUE
quidu "4A99929200CF"
roleview_list (list RoleViews
(object RoleView "mobjSettingProvider" @151
Parent_View @150
location (400, -470)
label (object SegLabel @152
Parent_View @151
location (1133, 836)
anchor 1
anchor_loc 1
nlines 1
max_width 360
justify 0
label "-mobjSettingProvider"
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929200D1"
client @150
supplier @149
line_style 0)
(object RoleView "$UNNAMED$31" @153
Parent_View @150
location (400, -470)
label (object SegLabel @154
Parent_View @153
location (803, 1071)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A99929200D0"
client @150
supplier @147
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::CtrlItemManager" @155
ShowCompartmentStereotypes TRUE
location (672, 1648)
label (object ItemLabel
Parent_View @155
location (509, 1625)
nlines 1
max_width 326
justify 0
label "CtrlItemManager")
stereotype (object ItemLabel
Parent_View @155
location (509, 1578)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929201D9"
width 344
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$28" @156
location (672, 1431)
stereotype TRUE
quidu "4A99929200C1"
roleview_list (list RoleViews
(object RoleView "mobjCtrlItemMgr" @157
Parent_View @156
location (-128, 935)
label (object SegLabel @158
Parent_View @157
location (631, 1539)
anchor 1
anchor_loc 1
nlines 1
max_width 300
justify 0
label "-mobjCtrlItemMgr"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A99929200C3"
client @156
supplier @155
line_style 0)
(object RoleView "$UNNAMED$29" @159
Parent_View @156
location (-128, 935)
label (object SegLabel @160
Parent_View @159
location (631, 1325)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A99929200C2"
client @156
supplier @147
line_style 0)))
(object ClassView "Class" "Logical View::控件程序说明::EventSourceManager" @161
ShowCompartmentStereotypes TRUE
location (1344, 1648)
label (object ItemLabel
Parent_View @161
location (1145, 1625)
nlines 1
max_width 398
justify 0
label "EventSourceManager")
stereotype (object ItemLabel
Parent_View @161
location (1145, 1578)
anchor 10
nlines 1
max_width 398
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929202C3"
width 416
height 162
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::UserModeWorker" @162
ShowCompartmentStereotypes TRUE
location (1344, 1216)
label (object ItemLabel
Parent_View @162
location (1181, 1193)
nlines 1
max_width 326
justify 0
label "UserModeWorker")
stereotype (object ItemLabel
Parent_View @162
location (1181, 1146)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292011E"
width 344
height 162
annotation 8
autoResize TRUE)
(object AssociationViewNew "$UNNAMED$36" @163
location (1344, 986)
stereotype TRUE
quidu "4A999292015C"
roleview_list (list RoleViews
(object RoleView "mobjSettingProvider" @164
Parent_View @163
location (976, -214)
label (object SegLabel @165
Parent_View @164
location (1317, 884)
anchor 1
anchor_loc 1
nlines 1
max_width 360
justify 0
label "-mobjSettingProvider"
pctDist 0.687898
height 28
orientation 0)
stereotype TRUE
quidu "4A999292015E"
client @163
supplier @149
line_style 0)
(object RoleView "$UNNAMED$37" @166
Parent_View @163
location (976, -214)
label (object SegLabel @167
Parent_View @166
location (1303, 1104)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A999292015D"
client @163
supplier @162
line_style 0)))
(object InheritView "" @168
stereotype TRUE
quidu "4A999292014C"
client @162
supplier @140
line_style 0)
(object AssociationViewNew "$UNNAMED$32" @169
location (1008, 1431)
stereotype TRUE
quidu "4A999292014E"
roleview_list (list RoleViews
(object RoleView "mobjCtrlItemMgr" @170
Parent_View @169
location (208, -9)
label (object SegLabel @171
Parent_View @170
location (817, 1504)
anchor 1
anchor_loc 1
nlines 1
max_width 300
justify 0
label "-mobjCtrlItemMgr"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920150"
client @169
supplier @155
line_style 0)
(object RoleView "$UNNAMED$33" @172
Parent_View @169
location (208, -9)
label (object SegLabel @173
Parent_View @172
location (1151, 1290)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A999292014F"
client @169
supplier @162
line_style 0)))
(object AssociationViewNew "$UNNAMED$34" @174
location (1344, 1431)
stereotype TRUE
quidu "4A9992920151"
roleview_list (list RoleViews
(object RoleView "mobjEventSourceMgr" @175
Parent_View @174
location (544, -9)
label (object SegLabel @176
Parent_View @175
location (1303, 1539)
anchor 1
anchor_loc 1
nlines 1
max_width 384
justify 0
label "-mobjEventSourceMgr"
pctDist 0.800000
height 42
orientation 1)
stereotype TRUE
quidu "4A9992920153"
client @174
supplier @161
line_style 0)
(object RoleView "$UNNAMED$35" @177
Parent_View @174
location (544, -9)
label (object SegLabel @178
Parent_View @177
location (1303, 1325)
hidden TRUE
anchor 1
anchor_loc 1
nlines 1
max_width 450
justify 0
label ""
pctDist 0.800000
height 42
orientation 0)
stereotype TRUE
quidu "4A9992920152"
client @174
supplier @162
line_style 0)))
(object NoteView @179
location (1520, 352)
label (object ItemLabel
Parent_View @179
location (1326, 230)
nlines 5
max_width 353
label "用户控件VB6Resizer负责对外提供接口,并且包含了了各种属性的保存/获取操作.")
width 413
height 257)
(object AttachView "" @180
stereotype TRUE
client @179
supplier @141
line_style 0)
(object NoteView @181
location (1824, 736)
label (object ItemLabel
Parent_View @181
location (1624, 574)
nlines 7
max_width 364
label "VB6Resizer通过接口此接口向工作者提供设定信息,如Enabled,Mode,MaxWidth,MaxHeight等等")
width 424
height 337)
(object NoteView @182
location (304, 304)
label (object ItemLabel
Parent_View @182
location (44, 61)
nlines 11
max_width 484
label
|VB6Resizer在初始化或者读取属性的时候,根据UserMode属性来决定创建DesignModeWorker还是UserModeWorker对象,然后通过无差别的调用IModeWorker接口中的函数来完成操作.此处用到了"状态(State)"设计模式
)
width 544
height 499)
(object InheritView "" @183
stereotype TRUE
quidu "4A99929000A0"
client @141
supplier @149
line_style 0)
(object AttachView "" @184
stereotype TRUE
client @181
supplier @149
line_style 0)
(object AttachView "" @185
stereotype TRUE
client @182
supplier @142
line_style 0)
(object NoteView @186
location (240, 1232)
label (object ItemLabel
Parent_View @186
location (52, 1063)
nlines 7
max_width 340
label "设计模式的工作者,实现了在设计时需要实现的功能,如初始化内存中的控件信息,读取或保存控件信息,等等..")
width 400
height 350)
(object AttachView "" @187
stereotype TRUE
client @147
supplier @186
line_style 0)
(object NoteView @188
location (1824, 1216)
label (object ItemLabel
Parent_View @188
location (1621, 1041)
nlines 8
max_width 371
label "运行模式的工作者,此工作者实现了运行时需要实现的功能,比如读取控件信息,调整控件,设置事件源,接收Resize事件并进行处理等等")
width 431
height 362)
(object AttachView "" @189
stereotype TRUE
client @188
supplier @162
line_style 0)
(object NoteView @190
location (1824, 1664)
label (object ItemLabel
Parent_View @190
location (1611, 1461)
nlines 9
max_width 390
label "此类提供了一个管理事件源监视器(即实现了IEventSource接口的类的对象)的功能,他提供了将窗体或者窗体中控件所产生的事件与某个类的对象相挂钩的机制")
width 450
height 418)
(object AttachView "" @191
stereotype TRUE
client @190
supplier @161
line_style 0)
(object NoteView @192
location (208, 1648)
label (object ItemLabel
Parent_View @192
location (48, 1532)
nlines 5
max_width 284
label "此类负责管理控件的位置信息,并提供了各种操作这些信息的方式.")
width 344
height 244)
(object AttachView "" @193
stereotype TRUE
client @192
supplier @155
line_style 0)))
(object ClassDiagram "容器接口"
quid "4A999644010A"
title "容器接口"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ClassView "Class" "Logical View::控件程序说明::VB6ResizerInterfaces::IContainer" @194
ShowCompartmentStereotypes TRUE
location (1056, 816)
label (object ItemLabel
Parent_View @194
location (863, 772)
nlines 1
max_width 386
justify 0
label "IContainer")
stereotype (object ItemLabel
Parent_View @194
location (863, 725)
anchor 10
nlines 1
max_width 386
justify 0
label "<<Interface>>")
icon "Interface"
icon_style "Label"
quidu "4A9992930014"
width 404
height 204
annotation 8
autoResize TRUE)
(object ClassView "Class" "Logical View::控件程序说明::FormInfo" @195
ShowCompartmentStereotypes TRUE
location (768, 1120)
label (object ItemLabel
Parent_View @195
location (605, 1097)
nlines 1
max_width 326
justify 0
label "FormInfo")
stereotype (object ItemLabel
Parent_View @195
location (605, 1050)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A999292036F"
width 344
height 162
annotation 8
autoResize TRUE)
(object InheritView "" @196
stereotype TRUE
quidu "4A999292039E"
client @195
supplier @194
line_style 0)
(object ClassView "Class" "Logical View::控件程序说明::CtrlItem" @197
ShowCompartmentStereotypes TRUE
location (1376, 1120)
label (object ItemLabel
Parent_View @197
location (1213, 1097)
nlines 1
max_width 326
justify 0
label "CtrlItem")
stereotype (object ItemLabel
Parent_View @197
location (1213, 1050)
anchor 10
nlines 1
max_width 326
justify 0
label "<<Class Module>>")
icon_style "Icon"
quidu "4A99929003AE"
width 344
height 162
annotation 8
autoResize TRUE)
(object InheritView "" @198
stereotype TRUE
quidu "4A99929003CD"
client @197
supplier @194
line_style 0)
(object NoteView @199
location (1056, 480)
label (object ItemLabel
Parent_View @199
location (743, 368)
nlines 5
max_width 590
label "此接口提供了初始高度和宽度信息,CtrlItem类的通过此接口提供的容器初始信息和实际容器信息对有效控件进行调整")
width 650
height 237)
(object AttachView "" @200
stereotype TRUE
client @199
supplier @194
line_style 0))))))
logical_presentations (list unit_reference_list
(object ClassDiagram "Main"
quid "4A9993540304"
title "Main"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))
(object Tier_Diagram "Three-Tiered Service Model"
quid "4A99921D00CA"
title "Three-Tiered Service Model"
documentation "A three-tiered architectural approach separates the various components of a client/server system into three tiers of services. The user services, business and other middle tier services, and data services are the logical tiers that collaborate in an application"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object TierView "User Services" @201
label (object ItemLabel
Parent_View @201
location (6, 6)
nlines 2
max_width -12
justify 0
label "User Services")
icon_style "Icon"
hidden TRUE
quidu "4A99921D00BE"
width 300
height 180)
(object TierView "Business Services" @202
location (600, 0)
label (object ItemLabel
Parent_View @202
location (606, 6)
nlines 2
max_width -12
justify 0
label "Business Services")
icon_style "Icon"
hidden TRUE
quidu "4A99921D00C0"
width 300
height 180)
(object TierView "Data Services" @203
location (1200, 0)
label (object ItemLabel
Parent_View @203
location (1206, 6)
nlines 2
max_width -12
justify 0
label "Data Services")
icon_style "Icon"
hidden TRUE
quidu "4A99921D00C2"
width 300
height 180)))))
root_subsystem (object SubSystem "Component View"
quid "4A99921C0380"
physical_models (list unit_reference_list
(object module "VB6ResizerLib" "NotAModuleType" "NotAModulePart"
attributes (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "ProjectFile"
value "E:\\CHDOC\\VB项目\\VB6Resizer\\VB6ResizerLib.vbp"))
quid "4A9992900004"
documentation "VB 6 Resizer"
stereotype "ActiveX Control"
language "Visual Basic")
(object module "VB6ResizerInterfaces" "NotAModuleType" "NotAModulePart"
quid "4A99929203DD"
stereotype "ActiveX"
realized_interfaces (list realize_rel_list
(object Realize_Relationship
quid "4A9992930015"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IContainer"
quidu "4A9992930014")
(object Realize_Relationship
quid "4A9992930043"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventSource"
quidu "4A9992930035")
(object Realize_Relationship
quid "4A9992930072"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget"
quidu "4A9992930065")
(object Realize_Relationship
quid "4A99929300A1"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker"
quidu "4A9992930093")
(object Realize_Relationship
quid "4A99929300DF"
supplier "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider"
quidu "4A99929300D2"))
language "COM"))
physical_presentations (list unit_reference_list
(object Module_Diagram "Main"
quid "4A99921D00AF"
title "Main"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list
(object ModView "Component View::VB6ResizerLib" "NotAModuleType" "NotAModulePart" @204
location (400, 944)
label (object ItemLabel
Parent_View @204
location (299, 966)
anchor_loc 3
nlines 2
max_width 384
label "VB6ResizerLib")
stereotype (object ItemLabel
Parent_View @204
location (299, 896)
anchor 10
anchor_loc 3
nlines 1
max_width 384
label "<<ActiveX Control>>")
icon "ActiveX Control"
icon_style "Icon"
quidu "4A9992900004"
width 692
autoResize TRUE
width 692
height 162)
(object ModView "Component View::VB6ResizerInterfaces" "NotAModuleType" "NotAModulePart" @205
location (256, 256)
label (object ItemLabel
Parent_View @205
location (189, 278)
anchor_loc 3
nlines 2
max_width 252
label "VB6ResizerInterfaces")
stereotype (object ItemLabel
Parent_View @205
location (189, 208)
anchor 10
anchor_loc 3
nlines 1
max_width 252
label "<<ActiveX>>")
icon_style "Icon"
quidu "4A99929203DD"
width 454
autoResize TRUE
width 454
height 162)
(object InterfaceView "Logical View::控件程序说明::VB6ResizerInterfaces::IContainer" @206
location (304, 576)
label (object ItemLabel
Parent_View @206
location (303, 684)
anchor_loc 1
nlines 2
max_width 229
justify 0
label "IContainer")
icon "Interface"
icon_style "Icon"
quidu "4A9992930014"
width 58
height 58
autoResize TRUE)
(object RealizeView "" @207
stereotype TRUE
quidu "4A9992930015"
client @205
supplier @206
line_style 0)
(object InterfaceView "Logical View::控件程序说明::VB6ResizerInterfaces::IEventSource" @208
location (752, 576)
label (object ItemLabel
Parent_View @208
location (751, 684)
anchor_loc 1
nlines 2
max_width 229
justify 0
label "IEventSource")
icon "Interface"
icon_style "Icon"
quidu "4A9992930035"
width 58
height 58
autoResize TRUE)
(object RealizeView "" @209
stereotype TRUE
quidu "4A9992930043"
client @205
supplier @208
line_style 0)
(object InterfaceView "Logical View::控件程序说明::VB6ResizerInterfaces::IEventTarget" @210
location (1024, 128)
label (object ItemLabel
Parent_View @210
location (1023, 236)
anchor_loc 1
nlines 2
max_width 229
justify 0
label "IEventTarget")
icon "Interface"
icon_style "Icon"
quidu "4A9992930065"
width 58
height 58
autoResize TRUE)
(object RealizeView "" @211
stereotype TRUE
quidu "4A9992930072"
client @205
supplier @210
line_style 0)
(object InterfaceView "Logical View::控件程序说明::VB6ResizerInterfaces::IModeWorker" @212
location (1200, 480)
label (object ItemLabel
Parent_View @212
location (1199, 588)
anchor_loc 1
nlines 2
max_width 229
justify 0
label "IModeWorker")
icon "Interface"
icon_style "Icon"
quidu "4A9992930093"
width 58
height 58
autoResize TRUE)
(object RealizeView "" @213
stereotype TRUE
quidu "4A99929300A1"
client @205
supplier @212
line_style 0)
(object InterfaceView "Logical View::控件程序说明::VB6ResizerInterfaces::ISettingProvider" @214
location (1200, 848)
label (object ItemLabel
Parent_View @214
location (1199, 956)
anchor_loc 1
nlines 2
max_width 229
justify 0
label "ISettingProvider")
icon "Interface"
icon_style "Icon"
quidu "4A99929300D2"
width 58
height 58
autoResize TRUE)
(object RealizeView "" @215
stereotype TRUE
quidu "4A99929300DF"
client @205
supplier @214
line_style 0)))))
process_structure (object Processes
quid "4A99921C0381"
ProcsNDevs (list
(object Process_Diagram "Deployment View"
quid "4A99921C0383"
title "Deployment View"
zoom 100
max_height 28350
max_width 21600
origin_x 0
origin_y 0
items (list diagram_item_list))))
properties (object Properties
attributes (list Attribute_Set
(object Attribute
tool "Repository"
name "HiddenTool"
value FALSE)
(object Attribute
tool "SourceSafe"
name "HiddenTool"
value FALSE)
(object Attribute
tool "TypeLibImporter"
name "HiddenTool"
value FALSE)
(object Attribute
tool "VC++"
name "propertyId"
value "809135966")
(object Attribute
tool "VC++"
name "default__Class"
value (list Attribute_Set
(object Attribute
tool "VC++"
name "Generate"
value TRUE)
(object Attribute
tool "VC++"
name "HeaderFile"
value "AUTO GENERATE")))
(object Attribute
tool "VC++"
name "default__Operation"
value (list Attribute_Set
(object Attribute
tool "VC++"
name "OperationIsConst"
value FALSE)
(object Attribute
tool "VC++"
name "OperationKindSet"
value (list Attribute_Set
(object Attribute
tool "VC++"
name "Non-virtual"
value 200)
(object Attribute
tool "VC++"
name "Abstract"
value 201)
(object Attribute
tool "VC++"
name "Virtual"
value 202)))
(object Attribute
tool "VC++"
name "OperationKind"
value ("OperationKindSet" 200))))
(object Attribute
tool "VC++"
name "HiddenTool"
value FALSE)
(object Attribute
tool "VJ++"
name "HiddenTool"
value FALSE)
(object Attribute
tool "Visual Basic"
name "propertyId"
value "783606378")
(object Attribute
tool "Visual Basic"
name "default__Class"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "CreatableSet"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "Private"
value 221)
(object Attribute
tool "Visual Basic"
name "PublicNotCreatable"
value 213)
(object Attribute
tool "Visual Basic"
name "SingleUse"
value 214)
(object Attribute
tool "Visual Basic"
name "GlobalSingleUse"
value 215)
(object Attribute
tool "Visual Basic"
name "MultiUse"
value 219)
(object Attribute
tool "Visual Basic"
name "GlobalMultiUse"
value 220)))
(object Attribute
tool "Visual Basic"
name "OptionBase"
value "0")
(object Attribute
tool "Visual Basic"
name "OptionExplicit"
value TRUE)
(object Attribute
tool "Visual Basic"
name "OptionCompare"
value ("CompareSet" 202))
(object Attribute
tool "Visual Basic"
name "Creatable"
value ("CreatableSet" 221))
(object Attribute
tool "Visual Basic"
name "GenerateInitialization"
value FALSE)
(object Attribute
tool "Visual Basic"
name "GenerateTermination"
value FALSE)
(object Attribute
tool "Visual Basic"
name "CollectionClass"
value "Collection")
(object Attribute
tool "Visual Basic"
name "CompareSet"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "None"
value 202)
(object Attribute
tool "Visual Basic"
name "Binary"
value 203)
(object Attribute
tool "Visual Basic"
name "Text"
value 204)))))
(object Attribute
tool "Visual Basic"
name "default__Operation"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "OperationName"
value "$operation")
(object Attribute
tool "Visual Basic"
name "LibraryName"
value "")
(object Attribute
tool "Visual Basic"
name "AliasName"
value "")
(object Attribute
tool "Visual Basic"
name "IsStatic"
value FALSE)
(object Attribute
tool "Visual Basic"
name "EntryCode"
value (value Text ""))
(object Attribute
tool "Visual Basic"
name "ExitCode"
value (value Text ""))))
(object Attribute
tool "Visual Basic"
name "default__Attribute"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "IsConst"
value FALSE)
(object Attribute
tool "Visual Basic"
name "New"
value FALSE)
(object Attribute
tool "Visual Basic"
name "WithEvents"
value FALSE)
(object Attribute
tool "Visual Basic"
name "Subscript"
value "")
(object Attribute
tool "Visual Basic"
name "NameIfUnlabeled"
value "the$supplier")
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value TRUE)
(object Attribute
tool "Visual Basic"
name "DataMemberName"
value "$relationship")
(object Attribute
tool "Visual Basic"
name "GenerateGetOperation"
value FALSE)
(object Attribute
tool "Visual Basic"
name "GenerateSetOperation"
value FALSE)
(object Attribute
tool "Visual Basic"
name "GenerateLetOperation"
value FALSE)))
(object Attribute
tool "Visual Basic"
name "default__Role"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "New"
value FALSE)
(object Attribute
tool "Visual Basic"
name "WithEvents"
value FALSE)
(object Attribute
tool "Visual Basic"
name "Subscript"
value "")
(object Attribute
tool "Visual Basic"
name "NameIfUnlabeled"
value "the$supplier")
(object Attribute
tool "Visual Basic"
name "GenerateDataMember"
value TRUE)
(object Attribute
tool "Visual Basic"
name "DataMemberName"
value "$relationship")
(object Attribute
tool "Visual Basic"
name "GenerateGetOperation"
value FALSE)
(object Attribute
tool "Visual Basic"
name "GenerateSetOperation"
value FALSE)
(object Attribute
tool "Visual Basic"
name "GenerateLetOperation"
value FALSE)))
(object Attribute
tool "Visual Basic"
name "default__Inherit"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "ImplementsDelegation"
value TRUE)))
(object Attribute
tool "Visual Basic"
name "default__Module-Spec"
value (list Attribute_Set
(object Attribute
tool "Visual Basic"
name "ProjectFile"
value "")))
(object Attribute
tool "Visual Basic"
name "HiddenTool"
value FALSE)
(object Attribute
tool "VisualStudio"
name "HiddenTool"
value FALSE))
quid "4A99921C0382"))
Вы можете оставить комментарий после Вход в систему
Неприемлемый контент может быть отображен здесь и не будет показан на странице. Вы можете проверить и изменить его с помощью соответствующей функции редактирования.
Если вы подтверждаете, что содержание не содержит непристойной лексики/перенаправления на рекламу/насилия/вульгарной порнографии/нарушений/пиратства/ложного/незначительного или незаконного контента, связанного с национальными законами и предписаниями, вы можете нажать «Отправить» для подачи апелляции, и мы обработаем ее как можно скорее.
Опубликовать ( 0 )