home *** CD-ROM | disk | FTP | other *** search
/ Delphi Anthology / aDELPHI.iso / ActiveX / THBResize.ActiveX.v2.0.Win9xNT.Incl.Keymaker-CORE / data1.cab / Example_Files / VbDemo1 / frmExclude.frm < prev    next >
Text File  |  1999-10-24  |  8KB  |  234 lines
  1. VERSION 5.00
  2. Object = "{5F697190-7457-11D3-930E-0000B4BDB148}#2.0#0"; "THBRes20.dll"
  3. Begin VB.Form frmExclude 
  4.    Caption         =   "Exclude specific controls"
  5.    ClientHeight    =   2148
  6.    ClientLeft      =   48
  7.    ClientTop       =   324
  8.    ClientWidth     =   4440
  9.    LinkTopic       =   "Form1"
  10.    ScaleHeight     =   2148
  11.    ScaleWidth      =   4440
  12.    StartUpPosition =   3  'Windows Default
  13.    Begin VB.TextBox Text4 
  14.       BeginProperty Font 
  15.          Name            =   "Arial"
  16.          Size            =   7.8
  17.          Charset         =   0
  18.          Weight          =   400
  19.          Underline       =   0   'False
  20.          Italic          =   0   'False
  21.          Strikethrough   =   0   'False
  22.       EndProperty
  23.       Height          =   288
  24.       Left            =   840
  25.       TabIndex        =   4
  26.       Text            =   "I'll not be resized"
  27.       Top             =   1560
  28.       Width           =   1332
  29.    End
  30.    Begin VB.TextBox Text3 
  31.       BeginProperty Font 
  32.          Name            =   "Arial"
  33.          Size            =   7.8
  34.          Charset         =   0
  35.          Weight          =   400
  36.          Underline       =   0   'False
  37.          Italic          =   0   'False
  38.          Strikethrough   =   0   'False
  39.       EndProperty
  40.       Height          =   288
  41.       Left            =   840
  42.       TabIndex        =   3
  43.       Text            =   "I'll be resized"
  44.       Top             =   1080
  45.       Width           =   1332
  46.    End
  47.    Begin VB.TextBox Text2 
  48.       BeginProperty Font 
  49.          Name            =   "Arial"
  50.          Size            =   7.8
  51.          Charset         =   0
  52.          Weight          =   400
  53.          Underline       =   0   'False
  54.          Italic          =   0   'False
  55.          Strikethrough   =   0   'False
  56.       EndProperty
  57.       Height          =   288
  58.       Left            =   840
  59.       TabIndex        =   2
  60.       Text            =   "I'll not be resized"
  61.       Top             =   600
  62.       Width           =   1332
  63.    End
  64.    Begin VB.TextBox Text1 
  65.       BeginProperty Font 
  66.          Name            =   "Arial"
  67.          Size            =   7.8
  68.          Charset         =   0
  69.          Weight          =   400
  70.          Underline       =   0   'False
  71.          Italic          =   0   'False
  72.          Strikethrough   =   0   'False
  73.       EndProperty
  74.       Height          =   288
  75.       Left            =   840
  76.       TabIndex        =   1
  77.       Text            =   "I'll be resized"
  78.       Top             =   120
  79.       Width           =   1332
  80.    End
  81.    Begin VB.Label Label4 
  82.       Caption         =   "I'll not be resized"
  83.       BeginProperty Font 
  84.          Name            =   "Arial"
  85.          Size            =   7.8
  86.          Charset         =   0
  87.          Weight          =   400
  88.          Underline       =   0   'False
  89.          Italic          =   0   'False
  90.          Strikethrough   =   0   'False
  91.       EndProperty
  92.       Height          =   252
  93.       Left            =   2400
  94.       TabIndex        =   8
  95.       Top             =   1560
  96.       Width           =   1572
  97.    End
  98.    Begin VB.Label Label3 
  99.       Caption         =   "I'll be resized"
  100.       BeginProperty Font 
  101.          Name            =   "Arial"
  102.          Size            =   7.8
  103.          Charset         =   0
  104.          Weight          =   400
  105.          Underline       =   0   'False
  106.          Italic          =   0   'False
  107.          Strikethrough   =   0   'False
  108.       EndProperty
  109.       Height          =   252
  110.       Left            =   2400
  111.       TabIndex        =   7
  112.       Top             =   1080
  113.       Width           =   1572
  114.    End
  115.    Begin VB.Label Label2 
  116.       Caption         =   "I'll not be resized"
  117.       BeginProperty Font 
  118.          Name            =   "Arial"
  119.          Size            =   7.8
  120.          Charset         =   0
  121.          Weight          =   400
  122.          Underline       =   0   'False
  123.          Italic          =   0   'False
  124.          Strikethrough   =   0   'False
  125.       EndProperty
  126.       Height          =   252
  127.       Left            =   2400
  128.       TabIndex        =   6
  129.       Top             =   600
  130.       Width           =   1572
  131.    End
  132.    Begin VB.Label Label1 
  133.       Caption         =   "I'll be resized"
  134.       BeginProperty Font 
  135.          Name            =   "Arial"
  136.          Size            =   7.8
  137.          Charset         =   0
  138.          Weight          =   400
  139.          Underline       =   0   'False
  140.          Italic          =   0   'False
  141.          Strikethrough   =   0   'False
  142.       EndProperty
  143.       Height          =   252
  144.       Left            =   2400
  145.       TabIndex        =   5
  146.       Top             =   120
  147.       Width           =   1572
  148.    End
  149.    Begin THBResizeLibCtl.THBResize THBResize1 
  150.       Height          =   372
  151.       Left            =   120
  152.       TabIndex        =   0
  153.       Top             =   120
  154.       Width           =   372
  155.       _cx             =   656
  156.       _cy             =   656
  157.       NoFontResizeAll =   0   'False
  158.       ResizeOnlyDirectChilds=   -1  'True
  159.       LimitFormWidthMin=   0
  160.       LimitFormWidthMax=   0
  161.       LimitFormHeightMin=   0
  162.       LimitFormHeightMax=   0
  163.       HideControlsSmallerThanWidth=   0
  164.       HideControlsSmallerThanHeight=   0
  165.       NumSpecialObjects=   4
  166.       BeginProperty SpecialObject0 {5F697192-7457-11D3-930E-0000B4BDB148} 
  167.          FixTop          =   0
  168.          FixBottom       =   0
  169.          FixLeft         =   0
  170.          FixRight        =   0
  171.          KeepWidth       =   0   'False
  172.          KeepHeight      =   0   'False
  173.          KeepAspect      =   0   'False
  174.          ControlName     =   "Label2"
  175.          NoFontResize    =   0   'False
  176.          Deactivate      =   0   'False
  177.          AddedAtDesignTime=   -1  'True
  178.          DeactivateAutoResize=   -1  'True
  179.       EndProperty
  180.       BeginProperty SpecialObject1 {5F697192-7457-11D3-930E-0000B4BDB148} 
  181.          FixTop          =   0
  182.          FixBottom       =   0
  183.          FixLeft         =   0
  184.          FixRight        =   0
  185.          KeepWidth       =   0   'False
  186.          KeepHeight      =   0   'False
  187.          KeepAspect      =   0   'False
  188.          ControlName     =   "Label4"
  189.          NoFontResize    =   0   'False
  190.          Deactivate      =   0   'False
  191.          AddedAtDesignTime=   -1  'True
  192.          DeactivateAutoResize=   -1  'True
  193.       EndProperty
  194.       BeginProperty SpecialObject2 {5F697192-7457-11D3-930E-0000B4BDB148} 
  195.          FixTop          =   0
  196.          FixBottom       =   0
  197.          FixLeft         =   0
  198.          FixRight        =   0
  199.          KeepWidth       =   0   'False
  200.          KeepHeight      =   0   'False
  201.          KeepAspect      =   0   'False
  202.          ControlName     =   "Text2"
  203.          NoFontResize    =   0   'False
  204.          Deactivate      =   0   'False
  205.          AddedAtDesignTime=   -1  'True
  206.          DeactivateAutoResize=   -1  'True
  207.       EndProperty
  208.       BeginProperty SpecialObject3 {5F697192-7457-11D3-930E-0000B4BDB148} 
  209.          FixTop          =   0
  210.          FixBottom       =   0
  211.          FixLeft         =   0
  212.          FixRight        =   0
  213.          KeepWidth       =   0   'False
  214.          KeepHeight      =   0   'False
  215.          KeepAspect      =   0   'False
  216.          ControlName     =   "Text4"
  217.          NoFontResize    =   0   'False
  218.          Deactivate      =   0   'False
  219.          AddedAtDesignTime=   -1  'True
  220.          DeactivateAutoResize=   -1  'True
  221.       EndProperty
  222.    End
  223. End
  224. Attribute VB_Name = "frmExclude"
  225. Attribute VB_GlobalNameSpace = False
  226. Attribute VB_Creatable = False
  227. Attribute VB_PredeclaredId = True
  228. Attribute VB_Exposed = False
  229. Option Explicit
  230.  
  231. Private Sub Form_Load()
  232.     THBResize1.hWnd = Me.hWnd
  233. End Sub
  234.