Subject Modal Form
From Don <dons@home.com>
Date Sat, 14 Nov 2020 00:12:22 -0500
Newsgroups dbase.getting-started


Why Doesn't This Code Open a Modal Form?

Local f
f = New Form2()
f.mdi = false
f.readmodal()


Class Form2 of Form                   //
This.Width            = 25
This.Height           = 25
This.Text             = "Form2"
This.MDI              = false
This.OnOpen           = Class::FormOnOpen
? "Form2 "

Function FormOnOpen
?        
? "Form2 Open"
*Form.WindowState        = 0
Return
EndClass

Don