TMessageBox.Default
From OpenEUO
Revision as of 08:34, 17 October 2011 by 204.236.253.94 (Talk)
You can set TMessageBox.Default to the value of the button you'd like selected as default
0 is always the left-most button and the selection moves right as the number increases.
The example below show cancel selected as default.
form = Obj.Create("TMessageBox")
form.Button = 3
form.Default = 2
form.Title = "Brian G's Tree Chopper"
form.Show("Path file not found!\nWould you like to make a new one right now?")
