The most straightforward workaround, to create an 'invisible' dummy button as the first item in the window - which can be animated as slowly as Windows wishes - seems to be effective on my Windows 7 PC:
Code: nomainwin
button #student, "", [], UL, WindowWidth, 0
button #student.btn6, "Get Student", [getStudentFile], UL, 100,50
open "Student File Maintenance" for window as #student
#student "font Microsoft_Sans_Serif 10"
#student "trapclose [studentEnd]"
#student.btn6 "!setfocus"
wait
[studentEnd]
close #student
end
Richard.