AkelPad

Code: Select all

var nW = "";
var nH = "";

if (fso.FileExists(sTemplatesFile))
{
  nW = 15;
  nH = 15;
}
else
{
  nW = 0;
  nH = 0;
}

Code: Select all

function DialogCallback(hWnd, uMsg, wParam, lParam)
{
  var nLowParam;
  var i;

  if (uMsg == 272 /*WM_INITDIALOG*/)
  {
    aDlg[IDTEXTCB].HWNDE = GetComboBoxEditWnd(aDlg[IDTEXTCB].HWND);
    //fill ComboBox
    for (i = 0; i < aHex.length; ++i)
      AkelPad.SendMessage(aDlg[IDTEXTCB].HWND, 323 /*CB_ADDSTRING*/, 0, aHex[i]);

    AkelPad.SendMessage(aDlg[IDTEXTCB].HWND, 334 /*CB_SETCURSEL*/, 0, 0);

    if (! fso.FileExists(sTemplatesFile))
      oSys.Call("User32::ShowWindow", aDlg[IDTEMPLATE].HWND, 0 /*SW_HIDE*/);
  }

  else if (uMsg == 6 /*WM_ACTIVATE*/)
  {
    if (wParam)
      oSys.Call("User32::RegisterHotKey", hWnd, 1, 0, 0x70 /*VK_F1*/);
    else
      oSys.Call("User32::UnregisterHotKey", hWnd, 1);
  }

  else if (uMsg == 786 /*WM_HOTKEY*/)
  {
    if ((wParam == 1) && oSys.Call("User32::IsWindowVisible", aDlg[IDTEMPLATE].HWND))
      Templates();
  }

  else if (uMsg == 273 /*WM_COMMAND*/)
  {
    nLowParam = wParam & 0xFFFF;

    if (nLowParam == IDOKB)
    {
      if (Action(hWnd))
        oSys.Call("User32::EndDialog", hWnd, 0);
    }

    else if (nLowParam == IDTEMPLATE)
      Templates();

    else if ((nLowParam == IDCANCELB) || (nLowParam == 2 /*IDCANCEL*/))
      oSys.Call("User32::EndDialog", hWnd, 0);
  }
}