/*append the separator and the choice Restore All
   to the system menu				         */

Def addAbout(self | hMenu)
{
  addAbout(self:ancestor); /*current ancestor is the Window class*/
  hMenu := Call GetSystemMenu(hWnd, 0);
  Call AppendMenu(hMenu, MF_SEPARATOR, 0, 0);
  Call AppendMenu(hMenu, 0, 0xF220, asciiz("Restore &All"))
}