在PB中限制窗口的最小尺寸

ehxz

免费乐捐，感谢支持

以下代码PB12测试通过。
1.定义结构，外部函数
type   point   from   structure
  long     x
  long     y
end   type
type   minmaxinfo   from   structure
  point     ptreserved
  point     ptmaxsize
  point     ptmaxposition
  point     ptmintracksize
  point     ptmaxtracksize
end   type

subroutine   GetMinMaxInfo   (   ref   minmaxinfo   d,   long   s,   long   l   )   library    'kernel32.dll '   alias   for   "RtlMoveMemory;Ansi"   
subroutine   SetMinMaxInfo   (   long   d,   minmaxinfo   s,   long   l   )   library    'kernel32.dll '   alias   for   "RtlMoveMemory;Ansi"
2.定义变量做为窗口的最小宽度和高度（MIN   SIZE）
long   il_orig_width=PixelsToUnits(800,XPixelsToUnits!)
long il_orig_height=PixelsToUnits(600,YpixelsToUnits!)
3.自定义事件
ue_minmaxinfo(pbm_getminmaxinfo)
MinMaxInfo   lstr_MinMaxInfo
/*   copy   the   data,   pointed   by   the   argument   MinMaxInfo,   to   our   lstr_MinMaxInfo   structure   */
GetMinMaxInfo(lstr_MinMaxInfo,   MinMaxInfo,   40)
/*   set   the   minimal   size   for   our   window   */

lstr_MinMaxInfo.ptMinTrackSize.x   =   UnitsToPixels(il_orig_width,   XUnitsToPixels!)
lstr_MinMaxInfo.ptMinTrackSize.y   =   UnitsToPixels(il_orig_height,   YUnitsToPixels!)
/*   copy   the   structure   back   into   memory   at   the   same   place   */
SetMinMaxInfo(MinMaxInfo,lstr_MinMaxInfo,40)
/*   important,   according   to   the   MS   API,   we   must   return   0   */
return   0

yuer

太帅了支持一下，我群里的！

ehxz

yuer 发表于 2011-5-20 17:54
太帅了支持一下，我群里的！

欢迎常来光顾！

tiantian88

原来是控制最大化，最小化的大小。

Ive加菲猫

不错的东东  谢谢分享了哈

我也群里的 嘿嘿

fuxiaoyang13

支持支持！！！！！！！！！！！！！！！！！！！！！