哎！我有1千多可用分。太多了，用不完。散分了。。。。。。

[aner127]

我的分太多了。都谁要，快点来。
只要给点源程序，供大家学习学习就给分！

[PF10GK22]

me too

[qiuyang_wang]

你要什么类型的原程序，在网上搜索一下不就的了，要不你说明白些。

[balloonman2002]

呵呵，这么多不睡觉的，蹭分了，：）

[青藤1111]

你先说个什么方面的，那么源代码就滚滚来了

[galaxypilot]

嘿嘿……送分吧！
if ib_resize=true then
int i,li_cb_count=1,li_sle_count=1,li_cbx_count=1,li_ddlb_count=1,li_dw_count=1,li_pic_count=1,li_st_count=1
int Li_ww[5],Li_wh[5],Li_wy[5]
int li_ww_pic[2],Li_wh_pic[2],Li_wy_pic[2]
int li_ww_st[2],li_wh_st[2],li_wy_st[2]

for i= 1 to ii_dw_count + ii_pic_count + ii_st_count //判断是否可缩放开始

if this.control[ii_control[i]].typeof()= datawindow! then
idw[li_dw_count]=this.control[ii_control[i]]
if ii_type[li_dw_count] =0 then
if ii_aspect[li_dw_count] = 0 then
Li_ww[li_dw_count]=idw[li_dw_count].width + (this.width - il_ww)
if Li_ww[li_dw_count]<0 then return
end if

if ii_aspect[li_dw_count] = 1 then
Li_wh[li_dw_count]=idw[li_dw_count].height + (this.height - il_wh)
if Li_wh[li_dw_count]<0 then return
end if

if ii_aspect[li_dw_count] = 2 then
Li_ww[li_dw_count]=idw[li_dw_count].width + (this.width - il_ww)
if Li_ww[li_dw_count]<0 then return
Li_wh[li_dw_count]=idw[li_dw_count].height + (this.height - il_wh)
if Li_wh[li_dw_count]<0 then return
end if
end if

if ii_type[li_dw_count] =1 then
if ii_aspect[li_dw_count]=1 then
Li_wy[li_dw_count]=idw[li_dw_count].y + (this.height - il_wh)
Li_ww[li_dw_count]=idw[li_dw_count].width + (this.width - il_ww)
if Li_ww[li_dw_count]<0 then return
end if
end if
li_dw_count=li_dw_count + 1
end if

if this.control[ii_control[i]].typeof()= picture! then
ipic[li_pic_count]=this.control[ii_control[i]]
if ii_type_pic[li_pic_count] =0 then
if ii_aspect_pic[li_pic_count] = 0 then
Li_ww_pic[li_pic_count]=ipic[li_pic_count].width + (this.width - il_ww)
if Li_ww_pic[li_pic_count]<0 then return
end if

if ii_aspect_pic[li_pic_count] = 1 then
Li_wh_pic[li_pic_count]=ipic[li_pic_count].height + (this.height - il_wh)
if Li_wh_pic[li_pic_count]<0 then return
end if

if ii_aspect_pic[li_pic_count] = 2 then
Li_ww_pic[li_pic_count]=ipic[li_pic_count].width + (this.width - il_ww)
if Li_ww_pic[li_pic_count]<0 then return
Li_wh_pic[li_pic_count]=ipic[li_pic_count].height + (this.height - il_wh)
if Li_wh_pic[li_pic_count]<0 then return
end if
end if

if ii_type_pic[li_pic_count] =1 then
if ii_aspect_pic[li_pic_count]=1 then
Li_wy_pic[li_pic_count]=ipic[li_pic_count].y + (this.height - il_wh)
Li_ww_pic[li_pic_count]=ipic[li_pic_count].width + (this.width - il_ww)
if Li_ww_pic[li_pic_count]<0 then return
end if
end if
li_pic_count=li_pic_count + 1
end if

if this.control[ii_control[i]].typeof()= statictext! then
ist[li_st_count]=this.control[ii_control[i]]
if ii_type_st[li_st_count] =0 then
if ii_aspect_st[li_st_count] = 0 then
Li_ww_st[li_st_count]=ist[li_st_count].width + (this.width - il_ww)
if Li_ww_st[li_st_count]<0 then return
end if

if ii_aspect_st[li_st_count] = 1 then
Li_wh_st[li_st_count]=ist[li_st_count].height + (this.height - il_wh)
if Li_wh_st[li_st_count]<0 then return
end if

if ii_aspect_st[li_st_count] = 2 then
Li_ww_st[li_st_count]=ist[li_st_count].width + (this.width - il_ww)
if Li_ww_st[li_st_count]<0 then return
Li_wh_st[li_st_count]=ist[li_st_count].height + (this.height - il_wh)
if Li_wh_st[li_st_count]<0 then return
end if
end if

if ii_type_st[li_st_count] =1 then
if ii_aspect_st[li_st_count]=1 then
Li_wy_st[li_st_count]=ist[li_st_count].y + (this.height - il_wh)
Li_ww_st[li_st_count]=ist[li_st_count].width + (this.width - il_ww)
if Li_ww_st[li_st_count]<0 then return
end if
end if
li_st_count=li_st_count + 1
end if
next ////判断是否可缩放结束

li_cb_count=1;li_sle_count=1;li_dw_count=1;li_pic_count=1;li_st_count=1
//移动开始
for i= 1 to ii_cb_count + ii_sle_count + ii_cbx_count + ii_ddlb_count + ii_dw_count + ii_pic_count + ii_st_count
if this.control[ii_control[i]].typeof()= commandbutton! then
icb[li_cb_count]=this.control[ii_control[i]]
icb[li_cb_count].x=icb[li_cb_count].x + (this.width - il_ww)
icb[li_cb_count].y=icb[li_cb_count].y + (this.height - il_wh)
li_cb_count=li_cb_count + 1
end if

if this.control[ii_control[i]].typeof()= singlelineedit! then
isle[li_sle_count]=this.control[ii_control[i]]
// isle[li_sle_count].x=isle[li_sle_count].x + (this.width - il_ww)
isle[li_sle_count].y=isle[li_sle_count].y + (this.height - il_wh)
li_sle_count=li_sle_count + 1
end if

if this.control[ii_control[i]].typeof()= checkbox! then
icbx[li_cbx_count]=this.control[ii_control[i]]
icbx[li_cbx_count].x=icbx[li_cbx_count].x + (this.width - il_ww)
icbx[li_cbx_count].y=icbx

[galaxypilot]

[li_cbx_count].y + (this.height - il_wh)
li_cbx_count=li_cbx_count + 1
end if

if this.control[ii_control[i]].typeof()= dropdownlistbox! then
iddlb[li_ddlb_count]=this.control[ii_control[i]]
iddlb[li_ddlb_count].x=iddlb[li_ddlb_count].x + (this.width - il_ww)
iddlb[li_ddlb_count].y=iddlb[li_ddlb_count].y + (this.height - il_wh)
li_sle_count=li_sle_count + 1
end if

if this.control[ii_control[i]].typeof()= datawindow! then
idw[li_dw_count]=this.control[ii_control[i]]
if ii_type[li_dw_count] =0 then
if ii_aspect[li_dw_count] = 0 then
idw[li_dw_count].width=idw[li_dw_count].width + (this.width - il_ww)
end if

if ii_aspect[li_dw_count] = 1 then
idw[li_dw_count].height=idw[li_dw_count].height + (this.height - il_wh)
end if

if ii_aspect[li_dw_count] = 2 then
idw[li_dw_count].width=idw[li_dw_count].width + (this.width - il_ww)
idw[li_dw_count].height=idw[li_dw_count].height + (this.height - il_wh)
end if
end if

if ii_type[li_dw_count] =1 then
if ii_aspect[li_dw_count]=1 then
idw[li_dw_count].y=idw[li_dw_count].y + (this.height - il_wh)
idw[li_dw_count].width=idw[li_dw_count].width + (this.width - il_ww)
end if
end if
li_dw_count=li_dw_count + 1
end if

if this.control[ii_control[i]].typeof()= picture! then
ipic[li_pic_count]=this.control[ii_control[i]]
if ii_type_pic[li_pic_count] =0 then
if ii_aspect_pic[li_pic_count] = 0 then
ipic[li_pic_count].width=ipic[li_pic_count].width + (this.width - il_ww)
end if

if ii_aspect_pic[li_pic_count] = 1 then
ipic[li_pic_count].height=ipic[li_pic_count].height + (this.height - il_wh)
end if

if ii_aspect_pic[li_pic_count] = 2 then
ipic[li_pic_count].width=ipic[li_pic_count].width + (this.width - il_ww)
ipic[li_pic_count].height=ipic[li_pic_count].height + (this.height - il_wh)
end if
end if

if ii_type_pic[li_pic_count] =1 then
if ii_aspect_pic[li_pic_count]=1 then
ipic[li_pic_count].y=ipic[li_pic_count].y + (this.height - il_wh)
ipic[li_pic_count].width=ipic[li_pic_count].width + (this.width - il_ww)
end if
end if
li_pic_count=li_pic_count + 1
end if

if this.control[ii_control[i]].typeof()= statictext! then
ist[li_st_count]=this.control[ii_control[i]]
if ii_type_st[li_st_count] =0 then
if ii_aspect_st[li_st_count] = 0 then
ist[li_st_count].width=ist[li_st_count].width + (this.width - il_ww)
end if

if ii_aspect_st[li_st_count] = 1 then
ist[li_st_count].height=ist[li_st_count].height + (this.height - il_wh)
end if

if ii_aspect_st[li_st_count] = 2 then
ist[li_st_count].width=ist[li_st_count].width + (this.width - il_ww)
ist[li_st_count].height=ist[li_st_count].height + (this.height - il_wh)
end if
end if

if ii_type_st[li_st_count] =1 then
if ii_aspect_st[li_st_count]=1 then
ist[li_st_count].y=ist[li_st_count].y + (this.height - il_wh)
ist[li_st_count].width=ist[li_st_count].width + (this.width - il_ww)
end if
if ii_aspect_st[li_st_count]=2 then
ist[li_st_count].x=ist[li_st_count].x + (this.width - il_ww)
ist[li_st_count].y=ist[li_st_count].y + (this.height - il_wh)
end if
end if
li_st_count=li_st_count + 1
end if
next //判断是否移动结束

il_ww=this.width
il_wh=this.height
end if

[bad_good]

谢谢

[jacksu19]

都没有一点注释或说明呢？

[xzh76215]

我

[sandorn]

我！！！！！！！！！！！！！！！！！！！！

[winy]

源程序别的我不大清楚，但在流方版主的网站http://www.liulee.net上能找到一些的。 ：）

[TheAres]

千分散尽还复来. 我的源程序多数都是陶青网站上的东西.