ExtCtrls.Frame3D    

uses ExtCtrls;procedure TForm1.FormPaint(Sender: TObject);var  R1, R2: TRect;begin  R1 := Rect(10, 10, 150, 50);  Frame3D(Canvas, R1, clBlack, clSilver, 1);  R2 := Bounds(10, 80, 140, 40);  Frame3D(Canvas, R2, clRed, clBlue, 1);end;

©著作权归作者所有：来自51CTO博客作者JLee79的原创作品，如需转载，请注明出处，否则将追究法律责任

更多相关文章

1. 关于分库分表后的数据统计异构方案
2. nginx开启日志，指定格式，查看执行时间
3. windows server 2016安装网卡驱动【引用】
4. 解密代码
5. 发文章加密教程
6. pycharm用爱发电
7. arc_loss训练手写数字分类
8. 使用语音包合成你想说的话-文字转语音
9. Spring-AOP

随机推荐

1. 快看！这里有一个PDOStatement::bindParam
2. PHP+JavaScript实现刷新继续保持倒计时的
3. 用PHP的FFI调用cjieba
4. PHP基础案例二：计算学生年龄
5. PHP结合MySQL实现千万级数据处理
6. PHP基础案例一：展示学生资料卡
7. php如何调用phantomJS截图
8. 教你在PHP ZipArchive解压缩时，去掉zip包
9. 详解PHP 如何对接 paypal 支付
10. 关于PHP正则匹配中文