Class: | tstextform |
*-- (c) Microsoft Corporation 1995 *-- Dynamically size all controls on the form based on *-- the form's dimensions thisform.LockScreen = .T. thisform.edtText.Width = thisform.Width thisform.edtText.Height = thisform.Height - 54 thisform.cmdClose.Left = INT(thisform.Width / 4) thisform.cmdPrint.Left = INT(thisform.Width / 1.75) thisform.cmdClose.Top = thisform.Height - 42 thisform.cmdPrint.Top = thisform.cmdClose.Top thisform.LockScreen = .F.