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

ss="u9">(htmpwnd, sw_normal);

      setforegroundwindow(htmpwnd);
      showwindow(htmpwnd, sw_show);
    end;
    exit;
  end;

  hinst := hinstance;
  fillchar(wc, sizeof(wc), 0);

  with wc do
  begin
    cbsize := sizeof(wc);
    style := cs_hredraw or cs_vredraw;
    lpfnwndproc := @wndproc;
    hinstance := hinst;
    hicon := loadicon(0, idi_application);
    hcursor := loadcursor(0, idc_arrow);
    hbrbackground := getsyscolorbrush(color_btnface);
    lpszclassname := str_internalname;
  end;

  if registerclassex(wc) = 0 then exit;

  hwnd := createwindowex(0, wc.lpszclassname, str_product,
    (*ws_overlapped or *)ws_minimizebox or ws_caption or ws_sysmenu,
    integer(cw_usedefault), integer(cw_usedefault), 320, 250,
    0, 0, hinst, nil);

  if hwnd = 0