home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programmer 7500
/
MAX_PROGRAMMERS.iso
/
VISUAL_B
/
CODIGO_2
/
SIZECTRL
/
VB1NOOVR.FRM
(
.txt
)
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Visual Basic Form
|
1995-03-16
|
1.7 KB
|
37 lines
Form2
(Preventing Siz controls from overlapping
Form3%
Label1
Drag the red and green rectangles around the form, or resize them by dragging the black corner "handles". You'll see that the code in the Resize event procedure won't let you overlap the two controls.
Form_Click
Left$
right
bottom
IntersectRect
lpDestRect
lpSrc1Rect
lpSrc2Rectg
IsRectEmpty,
lpRect
rSiz1
rSiz2
rIntersect
@ Form_Load
SaveRectangle
Siz2~
Width
heighto
Siz1_Resize
Corner
Siz2_Resize
retval
dummy
temprect
Label1
Label1_Click
Control
Form_Load
SaveRectangle
Siz1_Resize
Siz2_Resize