zwz_good  

2009年4月18日

摘要: procedure TForm1.FormPaint(Sender: TObject);var //font: TFont; lf: TLogFont; I: Integer;begin Canvas.Font.Name:= 'Arial'; Canvas.Font.Size:= 24; Canvas.Font.Color:= clRed; //font:= TFont.Create... 阅读全文
posted @ 2009-04-18 21:50 zwz_good 阅读(162) 评论(0) 推荐(0) 编辑
 
摘要: 阅读全文
posted @ 2009-04-18 17:14 zwz_good 阅读(178) 评论(0) 推荐(0) 编辑
 
摘要: TControl作为控件类的根类提供的服务:1)TControl控件基本信息TControl开始加入控件的基本信息并使用持久化机制保存信息。TControl声明的Left、Top等控件信息并使用Published关键字输出以便让客户端存取。这些控件信息会自动被持久化。 TControl = class(TComponent) private FParent: TWinControl; ... 阅读全文
posted @ 2009-04-18 17:09 zwz_good 阅读(277) 评论(0) 推荐(0) 编辑
 
摘要: 在标准的Windows程序中所有按钮均没有颜色。因此Delphi提供的所有按钮组件也均无颜色属性,有时你可能做了一个五颜六色的程序界面,而按钮颜色可能很不相称。 在此本人提供一种用自定义组件制作有颜色属性的铵钮的方法,它遵循了Delphi的组件定义规则,完成后该按钮与普通按钮(Button)相比,多了一个Color属性,你可以永远地使用它,在设计阶段随意地改变颜色,就象是Delphi本身提供的组件... 阅读全文
posted @ 2009-04-18 11:22 zwz_good 阅读(426) 评论(0) 推荐(0) 编辑