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

ehxz · 发表于 2011-5-20 17:17:57

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？站点注册

×

以下代码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 · 发表于 2011-5-20 17:54:13

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

ehxz · 发表于 2011-5-20 21:26:47

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

欢迎常来光顾！

tiantian88 · 发表于 2011-5-21 00:19:37

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

Ive加菲猫 · 发表于 2011-8-11 09:53:00

不错的东东谢谢分享了哈

我也群里的嘿嘿

fuxiaoyang13 · 发表于 2011-8-13 16:53:11

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

账号		自动登录	找回密码
密码			站点注册

[PB10-15.X] 在PB中限制窗口的最小尺寸

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。