怎么取图片框的宽度和高度到编辑框中？

精yì求精

鼠标左键单击图片框的时候取图片框的宽度和高度到编辑框中。
大虾们给个例子

qq964862

编辑框1.内容=到文本（图片框1.宽度）
编辑框2.内容=到文本（图片框1.高度）

帅丨灬

例程源码.rar (1.02 KB, 下载次数: 16)

2012-2-12 21:36 上传

点击文件名下载附件 [e].版本 2
.程序集 窗口程序集1
.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
编辑框1.内容 ＝ 到文本 (图片框1.高度)
编辑框1.加入文本 (“,”)
编辑框1.加入文本 (到文本 (图片框1.宽度))
[/e]

这就是LZ想要的

James丶Chen

.版本 2

.程序集 窗口程序集1

.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

编辑框1.加入文本 (到文本 (图片框1.宽度))
编辑框1.加入文本 (到文本 (图片框1.高度))