Thank you both. It is in the timer event and I now have it working flawlessly.


In timer.timer I put
WAIT WINDOW "Accepted default" TIMEOUT 5
RELEASE WINDOW

and in the form's okay button init I put
THISFORM.Timer1.Interval = IIF(TYPE("tStartTime") <> "U", ;
IIF(DATETIME()-tStartTime <= 100,30000,15000),30000)


>i am not shure if i undersoud your question korrektly... I think the answer ist:
>in the Timer event
>"Thisform.release()"