“序列号输入助手”源代码[1]

/////////////////////////////////////////////////////////
//        sninput                                      //
//                                                     //
//                            作者:黄展宏              //
//                            qq号:309654973           //
//                            创建于:2005/06/23        //
//                            修改于:2005/06/29        //
/////////////////////////////////////////////////////////


program sninput;

{$apptype gui}
{$i-}

uses
  windows,
  messages,
  sysutils;

var
  atom: integer = 0;
  hinst: integer;
  wc: twndclassex;
  msg: tmsg;

  hfont: integer = 0;
  hmutex: integer;

  hwnd: integer;
  hedit: integer;
  hcheckbox: integer;
  htmpwnd: integer;

const
  id_checkbox =&nb