|
| 盒子资源分类 |
![]() |
|
|
|
|
| 运行期更改控件的演示 |
![]() |
| 关键字：Runtime VCL 运行期 控件 |
| 来 自：转载,未知 |
| 平 台：Win9x,Win2k/XP/NT,Win2003 |
下载所需：0 火柴 |
| 深浅度：中级 |
完成时间：2006/6/2 |
| 发布者：guest |
发布时间：2006/6/3 |
| 编辑器：DELPHI7 |
语 种：简体中文 |
| 分 类：窗体 |
下载浏览：1913/14215 |
|
|
|
|
|
这个例子让你的程序可以在运行期间对控件进行选取、移动、动态更改所选对象尺寸等可视操作，和Delphi中的控件编辑很相似！
原是从国处论坛上抓过来的代码，使用后感觉不错，只是原来的代码有BUG，后经本人修正已经完美解决。
QQ:289161766
http://www.selonsoft.com
http://www.prowt.com |
| 本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！ |
| 相关文章 |
|
![]() |
|
|
| 相关评论 |
![]() |
|
共有评论5条
当前显示最后5条评论
|
| siow |
2006/6/3 13:30:29 |
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
try
Veraendern.Destroy;
Veraendern := nil;
Veraendern := Markierungen.Create(TControl(Sender));
except
Veraendern := Markierungen.Create(TControl(Sender));
end;
end;
这段有造成内存泄露的嫌疑。
大略看了一下，具体实现代码写的也不是很好，以前在大富翁里也看到过好多实现类似功能的代码，大家有兴趣可以自已搜一下。个人认为实现比较好的是DdhSizer.pas（有一些小BUG，请自行修正） |
| siow |
2006/6/3 13:45:44 |
| DdhSizer.pas的具体代码可在大富翁自行搜索。 |
| lxdu |
2006/6/5 14:50:25 |
| 有能实现旋转的吗？ |
| listary |
2006/6/18 16:57:58 |
| 正在找相关控件，多谢，对我有帮助，怎么能实现字体大小也随着变化呢？ |
| wangx_d |
2006/6/23 22:33:13 |
| bcb 下如何做 |
| 我要发表评论 |
查看全部评论 |
|
|
|
