home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_2 / SIZECTRL / DEMOZRDR.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-03-01  |  1.4 KB  |  41 lines
  1. VERSION 2.00
  2. Begin Form Form4 
  3.    Caption         =   "Keeping the most recently resized or moved control on top."
  4.    Height          =   4065
  5.    Left            =   1200
  6.    LinkTopic       =   "Form4"
  7.    ScaleHeight     =   3570
  8.    ScaleWidth      =   7545
  9.    Top             =   2055
  10.    Width           =   7755
  11.    Begin Siz Siz2 
  12.       BackColor       =   &H00FFFFFF&
  13.       Height          =   495
  14.       Left            =   3360
  15.       Top             =   1560
  16.       Width           =   3015
  17.    End
  18.    Begin Siz Siz1 
  19.       BackColor       =   &H000000FF&
  20.       Height          =   1335
  21.       Left            =   1560
  22.       Top             =   1080
  23.       Width           =   1575
  24.    End
  25.    Begin Label Label1 
  26.       BorderStyle     =   1  'Fixed Single
  27.       Caption         =   "Try resizing and moving the red and white controls in any way you like by dragging the controls or the black corner ""handles"" with the mouse.  Notice that when you place one control over another, the one you have just moved remains on top.  The code for this is in the Resize event procedures for Siz1 and Siz2."
  28.       Height          =   855
  29.       Left            =   0
  30.       TabIndex        =   0
  31.       Top             =   0
  32.       Width           =   7575
  33.    End
  34. Option Explicit
  35. Sub Siz1_Resize (Corner As Integer)
  36.   Siz1.ZOrder
  37. End Sub
  38. Sub Siz2_Resize (Corner As Integer)
  39.   Siz2.ZOrder
  40. End Sub
  41.