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 / frmLimitSize.frm < prev    next >
Text File  |  1999-10-24  |  2KB  |  61 lines
  1. VERSION 5.00
  2. Object = "{5F697190-7457-11D3-930E-0000B4BDB148}#2.0#0"; "THBRes20.dll"
  3. Begin VB.Form frmLimitSize 
  4.    Caption         =   "LimitSize"
  5.    ClientHeight    =   2496
  6.    ClientLeft      =   48
  7.    ClientTop       =   336
  8.    ClientWidth     =   3744
  9.    LinkTopic       =   "Form1"
  10.    ScaleHeight     =   2496
  11.    ScaleWidth      =   3744
  12.    StartUpPosition =   3  'Windows Default
  13.    Begin THBResizeLibCtl.THBResize THBResize1 
  14.       Height          =   252
  15.       Left            =   120
  16.       TabIndex        =   1
  17.       Top             =   2040
  18.       Width           =   372
  19.       _cx             =   656
  20.       _cy             =   444
  21.       NoFontResizeAll =   0   'False
  22.       ResizeOnlyDirectChilds=   -1  'True
  23.       LimitFormWidthMin=   320
  24.       LimitFormWidthMax=   800
  25.       LimitFormHeightMin=   200
  26.       LimitFormHeightMax=   600
  27.       HideControlsSmallerThanWidth=   0
  28.       HideControlsSmallerThanHeight=   0
  29.       FontSizeRelativeToWidthAndHeight=   -1  'True
  30.       NumSpecialObjects=   0
  31.    End
  32.    Begin VB.Label Label1 
  33.       Caption         =   "The size of this form is limited to a minimum of 320x200 and a maximum of 800x600"
  34.       BeginProperty Font 
  35.          Name            =   "Tahoma"
  36.          Size            =   7.8
  37.          Charset         =   0
  38.          Weight          =   400
  39.          Underline       =   0   'False
  40.          Italic          =   0   'False
  41.          Strikethrough   =   0   'False
  42.       EndProperty
  43.       Height          =   612
  44.       Left            =   360
  45.       TabIndex        =   0
  46.       Top             =   720
  47.       Width           =   3132
  48.    End
  49. End
  50. Attribute VB_Name = "frmLimitSize"
  51. Attribute VB_GlobalNameSpace = False
  52. Attribute VB_Creatable = False
  53. Attribute VB_PredeclaredId = True
  54. Attribute VB_Exposed = False
  55. Option Explicit
  56.  
  57. Private Sub Form_Load()
  58.     THBResize1.hWnd = Me.hWnd
  59.     
  60. End Sub
  61.