http://www.iteat.com/dev/delphi/t4/h17/1w148760.html
http://www.iteat.com/dev/delphi/t2/h15/1u148757.html 组件的制作过程
4.3日
完成图象的阴影效果.利用在同一个画布里面调用两次画图函数,根据传入的位置不同,画出有点距离感的阴影..
(进度还是很慢..加油....)
4.23
心得1:
问题1:基本完成流程图,但是字体的保存和再读出有问题,复制后再显示,按钮的文字不见了
分析可能 1:字体属性保存不完整,造成读出的时候没有足够的信息画出文字
2:笔的模式用了xor,一共画了两次,使文字不见了。
解决方案:日,郁闷坏了,原因居然是strToInt(astring)和 integer(astring)是有区别的,在delphi中尽量都用strtoint(),虽然目前还不知道他们区别是什么,但是用strtoint可以正常的转换,郁闷啊。
我是用把各个属性保存连接为一个字符串,读出时候再用一个函数分解字符串。切记,以后用strtoint
心得2:由于用的都是在cavas上画图形,其实就是一白纸,由于填充是以边界填,所以上下层填充的边界不能一样
所以把一个pen。color设置为黑色,一个固定为blue。
心得3:有时候会发现某一块空白了,有可能1:是填充没填充好,2,刷新的问题。