LOCAL luValue, lnTop, lnLeft *** Calculate where the popup calendar should be instantiated *** So it pops up directly below the date text box *** SYSMETRIC( 9 ) is the height of the Form's title bar in case you were curious lnTop = OBJTOCLIENT( Thisform, 1 ) + OBJTOCLIENT( This, 1 ) + This.Height + 2 lnLeft = OBJTOCLIENT( Thisform, 2 ) + OBJTOCLIENT( This, 2 ) DO FORM GetDate WITH lnTop, lnLeft, This.Value TO luValue This.Value = luValueMarcia