gistfile1.ec

import "ecere"

class Form1 : Window
{
   caption = $"Form1";
   background = formColor;
   borderStyle = sizable;
   hasMaximize = true;
   hasMinimize = true;
   hasClose = true;
   clientSize = { 632, 438 };

   Window ws { this, size = { 100, 100 } };

   Button button1
   {
      /*ws, master = */this, caption = $"button1", position = { 232, 136 };

      bool NotifyClicked(Button button, int x, int y, Modifiers mods)
      {
         Sleep(3);
         MessageBox { master = ws }.Modal();
         return true;
      }
   };
}

Form1 form1 {};