B1.click thisform.Autocenter = .T. && <=== this ignore MaxLeft B2.click thisform.MaxLeft = m.thisform.MaxLeft && <== this fire C internal codeThe VFPT implement it for this master task:
thisform.MaxLeft = sysm(0)- 40 && force the form into the desktop area * and put next line in moved event thisform.MaxLeft = m.thisform.MaxLeft * but this can to be done with the next line into the Moved event thisform.Left = MIN(m.thisform.Left,sysm(0)- 40)Then, because MaxLeft and MaxTop are passive properties, they are useless.