RbBFBlokProjPSIVStrn2007.04 ACnmStrnAChpStrnACsvStrnVer1Strn1 Ver2Strn0 Ver3Strn0 RelsStrn0 NnRlStrn0 RegnStrnSVerStrnLVerStrnIVerStrnaiviInt DVewInt x4prTpInt DLanInt CLanInt DEncInt BflgInt IconGrupEndGInt MacCStrnBMacStrnMy Application (Classic)BCarStrnMy Application BCMOStrnMy Application BunIStrnBSizInt @BMSzInt BSzSStrn4096BMSSStrn2048MDIcStrnBWinStrnMy Application.exe BMDIInt WcmNStrnWpNmStrnWiNmStrnBL86Strn MyApplication DgCLStrnPadnPadn|********************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************BlokpObj<NameStrnApp ContInt paswStrnbClsInt SuprStrn Application flagInt bNtrInt bApOInt CompStrnPDefGrup$nameStrnMenuBar PValInt P2EndGInt VwBhGrupEndGInt CnstGrupEncoInt nameStrnkFileQuitShortcut typeInt defnStrnflagInt CInsGrup0pltfInt langInt defnStrnCmd+Q EndGInt CInsGrup0pltfInt langInt defnStrnCtrl+Q EndGInt EndGInt CnstGrupEncoInt nameStrn kFileQuit typeInt defnStrn&Quit flagInt CInsGrup0pltfInt langInt defnStrnE&xit EndGInt EndGInt CnstGrupEncoInt nameStrn kEditClear typeInt defnStrn&Delete flagInt CInsGrup0pltfInt langInt defnStrn&Delete EndGInt CInsGrup0pltfInt langInt defnStrn&Delete EndGInt EndGInt PadnPadnT************************************************************************************BlokpVewx4$NameStrnWindow1 ContInt paswStrnbClsInt SuprStrnWindow flagInt bNtrInt CompStrnPDefGrup<nameStrnImplicitInstanceEncoInt PValStrnTrueEndGInt PDefGrup0nameStrnMenuBar PValStrn 156250832 EndGInt PDefGrup(nameStrn MacProcID PValInt EndGInt PDefGrup4nameStrn BalloonHelp EncoInt PValStrnEndGInt PDefGrup0nameStrnMinimizeButton PValStrnTrueEndGInt PDefGrup4nameStrnMaximizeButton PValStrnFalse EndGInt PDefGrup,nameStrn LiveResize PValStrnTrueEndGInt PDefGrup0nameStrn Resizeable PValStrnFalse EndGInt PDefGrup,nameStrn CloseButton PValStrnTrueEndGInt PDefGrup0nameStrnMenuBarVisible PValStrnTrueEndGInt PDefGrup0nameStrn FullScreen PValStrnFalse EndGInt PDefGrup(nameStrnVisible PValStrnTrueEndGInt PDefGrup8nameStrnTitle EncoInt PValStrnUntitledEndGInt PDefGrup$nameStrnBackdropPValStrnEndGInt PDefGrup(nameStrn BackColor PValInt EndGInt PDefGrup0nameStrn HasBackColorPValStrnFalse EndGInt PDefGrup0nameStrn Composite PValStrnFalse EndGInt PDefGrup$nameStrnFrame PValInt EndGInt PDefGrup(nameStrn MaxHeight PValInt }EndGInt PDefGrup$nameStrnMaxWidthPValInt }EndGInt PDefGrup(nameStrn MinHeight PValInt @EndGInt PDefGrup$nameStrnMinWidthPValInt @EndGInt PDefGrup$nameStrnHeight PValInt ,EndGInt PDefGrup$nameStrnWidth PValInt ,EndGInt PDefGrup(nameStrn Placement PValInt EndGInt VwBhGruptVwPrGrupDNameStrnNameVsblInt PrGpStrnID CPifStrnWindow EndGInt VwPrGrupLNameStrn Interfaces VsblInt PrGpStrnID CPifStrnWindow EndGInt VwPrGrupHNameStrnSuper VsblInt PrGpStrnID CPifStrnWindow EndGInt VwPrGrup0NameStrn Placement VsblInt PrGpStrnPositionPValStrn0 typeStrnInteger vbETStrnEnumCPifStrnWindow EnumGrupdefnStrn 0 - Default defnStrn1 - Parent Window defnStrn2 - Main Screen defnStrn3 - Parent Window ScreendefnStrn 4 - Stagger EndGInt EndGInt VwPrGruppNameStrnWidth VsblInt PrGpStrnPositionPValStrn300 typeStrnInteger CPifStrnWindow EndGInt VwPrGruppNameStrnHeight VsblInt PrGpStrnPositionPValStrn300 typeStrnInteger CPifStrnWindow EndGInt VwPrGruppNameStrnMinWidthVsblInt PrGpStrnPositionPValStrn64 typeStrnInteger CPifStrnWindow EndGInt VwPrGruptNameStrn MinHeight VsblInt PrGpStrnPositionPValStrn64 typeStrnInteger CPifStrnWindow EndGInt VwPrGruptNameStrnMaxWidthVsblInt PrGpStrnPositionPValStrn32000 typeStrnInteger CPifStrnWindow EndGInt VwPrGrupxNameStrn MaxHeight VsblInt PrGpStrnPositionPValStrn32000 typeStrnInteger CPifStrnWindow EndGInt VwPrGrup NameStrnFrame VsblInt PrGpStrn Appearance PValStrn0 typeStrnInteger vbETStrnEnumCPifStrnWindow EnumGruppdefnStrn 0 - DocumentdefnStrn1 - Movable Modal defnStrn2 - Modal DialogdefnStrn3 - Floating Window defnStrn 4 - Plain Box defnStrn5 - Shadowed BoxdefnStrn6 - Rounded Window defnStrn7 - Global Floating Window defnStrn8 - Sheet WindowdefnStrn9 - Metal WindowdefnStrn10 - Drawer Window defnStrn11 - Modeless DialogEndGInt EndGInt VwPrGrup|NameStrn Composite VsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt VwPrGrup|NameStrn HasBackColorVsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt VwPrGrup|NameStrn BackColor VsblInt PrGpStrn Appearance PValStrn&hFFFFFFtypeStrnColor CPifStrnWindow EndGInt VwPrGrupxNameStrnBackdropVsblInt PrGpStrn Appearance typeStrnPicture vbETStrnPicture CPifStrnWindow EndGInt VwPrGrupxNameStrnTitle VsblInt PrGpStrn Appearance PValStrnUntitledtypeStrnString CPifStrnWindow EndGInt VwPrGruptNameStrnVisible VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt VwPrGrup|NameStrn FullScreen VsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt VwPrGrup|NameStrnMenuBarVisible VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt VwPrGrupxNameStrn CloseButton VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt VwPrGrup|NameStrn Resizeable VsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt VwPrGrupxNameStrn LiveResize VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt VwPrGrupNameStrnMaximizeButton VsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt VwPrGrup|NameStrnMinimizeButton VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt VwPrGruphNameStrn BalloonHelp VsblInt PrGpStrn Appearance typeStrnString CPifStrnWindow EndGInt VwPrGrupxNameStrn MacProcID VsblInt PrGpStrn Appearance PValStrn0 typeStrnInteger CPifStrnWindow EndGInt VwPrGrupxNameStrnMenuBar VsblInt PrGpStrn Appearance typeStrnMenuBar vbETStrnMenuBar CPifStrnWindow EndGInt VwPrGrup|NameStrnImplicitInstanceVsblInt PrGpStrn Appearance PValStrnTruevbETStrnBoolean CPifStrnWindow EndGInt EndGInt CBhvGrupSuprStrn BevelButton HInsGrupnameStrnAction CompStrnVsblInt sorcGrupdEncoInt srclStrn Sub Action()srclStrnmsgbox Window2.RunDialog() srclStrnEnd Sub EndGInt EndGInt EndGInt CtrlGrup cclsStrn BevelButton nameStrn BevelButton PDefGrup0nameStrn Underline PValStrnFalse EndGInt PDefGrup,nameStrnItalic PValStrnFalse EndGInt PDefGrup(nameStrnBoldPValStrnFalse EndGInt PDefGrup$nameStrnTextSizePValInt EndGInt PDefGrup8nameStrnTextFontEncoInt PValStrnSystem EndGInt PDefGrup0nameStrn AcceptFocus PValStrnFalse EndGInt PDefGrup(nameStrn ButtonType PValInt EndGInt PDefGrup(nameStrn MenuValue PValInt EndGInt PDefGrup,nameStrnValue PValStrnFalse EndGInt PDefGrup$nameStrnHasMenu PValInt EndGInt PDefGrup$nameStrnBevel PValInt EndGInt PDefGrup$nameStrnIconDY PValInt EndGInt PDefGrup$nameStrnIconDX PValInt EndGInt PDefGrup(nameStrn IconAlign PValInt EndGInt PDefGrup nameStrnIconPValStrnEndGInt PDefGrup(nameStrn CaptionDeltaPValInt EndGInt PDefGrup,nameStrnCaptionPlacementPValInt EndGInt PDefGrup(nameStrn CaptionAlignPValInt EndGInt PDefGrup8nameStrnCaption EncoInt PValStrnUntitledEndGInt PDefGrup(nameStrnEnabled PValStrnTrueEndGInt PDefGrup0nameStrnAutoDeactivate PValStrnTrueEndGInt PDefGrup0nameStrnHelpTag EncoInt PValStrnEndGInt PDefGrup(nameStrnVisible PValStrnTrueEndGInt PDefGrup8nameStrn InitialParent EncoInt PValStrnEndGInt PDefGrup,nameStrn TabPanelIndex PValInt EndGInt PDefGrup(nameStrn LockBottom PValStrnEndGInt PDefGrup(nameStrn LockRight PValStrnEndGInt PDefGrup$nameStrnLockTop PValStrnEndGInt PDefGrup$nameStrnLockLeftPValStrnEndGInt PDefGrup$nameStrnHeight PValInt EndGInt PDefGrup$nameStrnWidth PValInt NameStrn Resizeable VsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt >VwPrGrupx?NameStrn LiveResize VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt ?VwPrGrup@NameStrnMaximizeButton VsblInt PrGpStrn Appearance PValStrnFalse typeStrnBoolean CPifStrnWindow EndGInt @VwPrGrup|ANameStrnMinimizeButton VsblInt PrGpStrn Appearance PValStrnTruetypeStrnBoolean CPifStrnWindow EndGInt AVwPrGruphBNameStrn BalloonHelp VsblInt PrGpStrn Appearance typeStrnString CPifStrnWindow EndGInt BVwPrGrupxCNameStrn MacProcID VsblInt PrGpStrn Appearance PValStrn0 typeStrnInteger CPifStrnWindow EndGInt CVwPrGrupxDNameStrnMenuBar VsblInt PrGpStrn Appearance typeStrnMenuBar vbETStrnMenuBar CPifStrnWindow EndGInt DVwPrGrup|ENameStrnImplicitInstanceVsblInt PrGpStrn Appearance PValStrnTruevbETStrnBoolean CPifStrnWindow EndGInt EEndGInt 'CBhvGrupFSuprStrn EditField EndGInt FCBhvGrupGSuprStrn PushButton HInsGrupHnameStrnAction CompStrnVsblInt sorcGrupTIEncoInt srclStrn Sub Action()srclStrn self.close srclStrnEnd Sub EndGInt IEndGInt HEndGInt GCBhvGrupJSuprStrn PushButton HInsGrupKnameStrnAction CompStrnVsblInt sorcGrupLEncoInt srclStrn Sub Action()srclStrn thereturnValue = EditField1.textsrclStrnsrclStrn self.close srclStrnEnd Sub EndGInt LEndGInt KEndGInt JCtrlGrup McclsStrn EditField nameStrn EditField PDefGrup8NnameStrn InitialParent EncoInt PValStrnEndGInt NPDefGrup4OnameStrn DataField EncoInt PValStrnEndGInt OPDefGrup4PnameStrn DataSource EncoInt PValStrnEndGInt PPDefGrup(QnameStrn Alignment PValInt EndGInt QPDefGrup(RnameStrn AcceptTabs PValStrnEndGInt RPDefGrup(SnameStrn LimitText PValInt EndGInt SPDefGrup$TnameStrnReadOnlyPValStrnEndGInt TPDefGrup,UnameStrnMaskEncoInt PValStrnEndGInt UPDefGrup,VnameStrnTextEncoInt PValStrnEndGInt VPDefGrup(WnameStrn Underline PValStrnEndGInt WPDefGrup$XnameStrnItalic PValStrnEndGInt XPDefGrup YnameStrnBoldPValStrnEndGInt YPDefGrup$ZnameStrnTextSizePValInt EndGInt ZPDefGrup8[nameStrnTextFontEncoInt PValStrnSystem EndGInt [PDefGrup0\nameStrnAutoDeactivate PValStrnTrueEndGInt \PDefGrup0]nameStrnHelpTag EncoInt PValStrnEndGInt ]PDefGrup(^nameStrnVisible PValStrnTrueEndGInt ^PDefGrup0_nameStrnFormat EncoInt PValStrnEndGInt _PDefGrup(`nameStrnEnabled PValStrnTrueEndGInt `PDefGrup(anameStrn BackColor PValInt EndGInt aPDefGrup(bnameStrn TextColor PValInt EndGInt bPDefGrup,cnameStrn UseFocusRingPValStrnTrueEndGInt cPDefGrup$dnameStrnPasswordPValStrnEndGInt dPDefGrup$enameStrnStyled PValStrnEndGInt ePDefGrup4fnameStrnScrollbarVertical PValStrnTrueEndGInt fPDefGrup0gnameStrnScrollbarHorizontal PValStrnEndGInt gPDefGrup(hnameStrn Multiline PValStrnEndGInt hPDefGrup(inameStrnBorder PValStrnTrueEndGInt iPDefGrup,jnameStrn TabPanelIndex PValInt EndGInt jPDefGrup(knameStrn LockBottom PValStrnEndGInt kPDefGrup(lnameStrn LockRight PValStrnEndGInt lPDefGrup$mnameStrnLockTop PValStrnEndGInt mPDefGrup$nnameStrnLockLeftPValStrnEndGInt nPDefGrup$onameStrnHeight PValInt EndGInt oPDefGrup$pnameStrnWidth PValInt EndGInt pPDefGrup qnameStrnTop PValInt EndGInt qPDefGrup rnameStrnLeftPValInt EndGInt rPDefGrup(snameStrn ControlOrderPValInt EndGInt sPDefGrup(tnameStrnScope PValStrn0 EndGInt tPDefGrup<unameStrnSuper EncoInt PValStrn EditField EndGInt uPDefGrup$vnameStrnIndex PValInt EndGInt vPDefGrup8wnameStrnNameEncoInt PValStrn EditField1 EndGInt wCBixInt EndGInt MCtrlGrup(xcclsStrn PushButton nameStrn PushButton PDefGrup8ynameStrn InitialParent EncoInt PValStrnEndGInt yPDefGrup(znameStrn Underline PValStrnEndGInt zPDefGrup${nameStrnItalic PValStrnEndGInt {PDefGrup |nameStrnBoldPValStrnEndGInt |PDefGrup$}nameStrnTextSizePValInt EndGInt }PDefGrup8~nameStrnTextFontEncoInt PValStrnSystem EndGInt ~PDefGrup0nameStrnAutoDeactivate PValStrnTrueEndGInt PDefGrup0nameStrnHelpTag EncoInt PValStrnEndGInt PDefGrup(nameStrnVisible PValStrnTrueEndGInt PDefGrup(nameStrnEnabled PValStrnTrueEndGInt PDefGrup$nameStrnCancel PValStrnEndGInt PDefGrup$nameStrnDefault PValStrnEndGInt PDefGrup8nameStrnCaption EncoInt PValStrnCancel EndGInt PDefGrup,nameStrn TabPanelIndex PValInt EndGInt PDefGrup(nameStrn LockBottom PValStrnEndGInt PDefGrup(nameStrn LockRight PValStrnEndGInt PDefGrup$nameStrnLockTop PValStrnEndGInt PDefGrup$nameStrnLockLeftPValStrnEndGInt PDefGrup$nameStrnHeight PValInt EndGInt PDefGrup$nameStrnWidth PValInt PEndGInt PDefGrup nameStrnTop PValInt DEndGInt PDefGrup nameStrnLeftPValInt EndGInt PDefGrup(nameStrn ControlOrderPValInt EndGInt PDefGrup(nameStrnScope PValStrn0 EndGInt PDefGrup<nameStrnSuper EncoInt PValStrn PushButton EndGInt PDefGrup$nameStrnIndex PValInt EndGInt PDefGrup4nameStrnNameEncoInt PValStrnpbCancelEndGInt CBixInt EndGInt xCtrlGrup cclsStrn PushButton nameStrn PushButton PDefGrup8nameStrn InitialParent EncoInt PValStrnEndGInt PDefGrup(nameStrn Underline PValStrnEndGInt PDefGrup$nameStrnItalic PValStrnEndGInt PDefGrup nameStrnBoldPValStrnEndGInt PDefGrup$nameStrnTextSizePValInt EndGInt PDefGrup8nameStrnTextFontEncoInt PValStrnSystem EndGInt PDefGrup0nameStrnAutoDeactivate PValStrnTrueEndGInt PDefGrup0nameStrnHelpTag EncoInt PValStrnEndGInt PDefGrup(nameStrnVisible PValStrnTrueEndGInt PDefGrup(nameStrnEnabled PValStrnTrueEndGInt PDefGrup$nameStrnCancel PValStrnEndGInt PDefGrup$nameStrnDefault PValStrnEndGInt PDefGrup4nameStrnCaption EncoInt PValStrnOK EndGInt PDefGrup,nameStrn TabPanelIndex PValInt EndGInt PDefGrup(nameStrn LockBottom PValStrnEndGInt PDefGrup(nameStrn LockRight PValStrnEndGInt PDefGrup$nameStrnLockTop PValStrnEndGInt PDefGrup$nameStrnLockLeftPValStrnEndGInt PDefGrup$nameStrnHeight PValInt EndGInt PDefGrup$nameStrnWidth PValInt PEndGInt PDefGrup nameStrnTop PValInt DEndGInt PDefGrup nameStrnLeftPValInt EndGInt PDefGrup(nameStrn ControlOrderPValInt EndGInt PDefGrup(nameStrnScope PValStrn0 EndGInt PDefGrup<nameStrnSuper EncoInt PValStrn PushButton EndGInt PDefGrup$nameStrnIndex PValInt EndGInt PDefGrup0nameStrnNameEncoInt PValStrnpbOKEndGInt CBixInt EndGInt PadnPadn************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************BlokpUIsWnStGrupOTabGrupContInt eSptInt EndGInt OTabGrupdContInt p8<LSptInt RSptInt ScrXInt ScrYInt lstHInt @lstVInt @CtrlInt EndGInt OTabGrup(ContInt p8<AltEInt LSptInt EndGInt OTabGrupdContInt x4LSptInt RSptInt ScrXInt ScrYInt lstHInt @lstVInt @CtrlInt EndGInt OTabGrup4ContInt x4AltEInt LSptInt ciIDInt EndGInt LsLcStrnWindow1.BevelButton1.Action rEdtRect 2EndGInt PadnPadn****************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************EOF!