Delphi之快速设计(程序设计篇)(2)

刻”的条件时，我们没有必要再像以前一样，先定义一个过程（ShowMyHint(...)），然后在程序初始化的地方
把她赋值给TApplication的OnHin事件。因为只需将状态条的AutoHint属性设为True即可！当然，她似乎只能在
第一个Panel上显示（这就是没有太“苛刻”的条件时）。当然，怪我罗嗦，有的朋友居然不知道Delphi的Hint
属性由两部分组成，此处不是说话之地，感兴趣请到笔者的个人主页上去遛遛www.zg169.net/~delphiok（刚开
张，东西还不多）。
2、节省代码：
能够少写代码就没有必要多写代码，能够精炼就不要冗余：
比如，以下的两段代码实现的功能完全相同，你喜欢用哪段？
代码段一：
if ToolButton1.Down=true then
begin
Dbgrid1.show;
DelBtn.Enabled:=true;
end
else
begin
Dbgrid1.Hide;
DelBtn.Enabled:=false;
end;
代码段二：
Dbgrid1.Visible:=ToolButton1.Down;
DelBtn.Enabled:=ToolButton1.Down;
因此，我们写完程序后，不要仅仅追求程序调通，不妨也给程序代码炸炸油。
3、节省变量：
有的程序员在不需要变量的地方定义了变量，在需要变量的地方定义了多余的变量，我个人认为这都不是好的
习惯，特别是动不动就定义全局变量更是值得商榷。有的读者可能认为我是一个守财奴，现在的处理器速度都
什么年代了……但我只简单的给你展示一段代码你就明白了：
procedure TForm1.Button1Click(Sender: TObject);
Var s1,s2:String;
begin
s1:=Inputbox(''''数据'''',''''请输入用户姓名'''','''''''');
if s1<>'''''''' then
begin
Btn_Name.Enabled:=True;
s2:=Inputbox(''''数据'''',''''请输入用户住址'''','''''''');
if s2<>'''''''' then
Btn_Adress.Enabled:=True;
end;
end;

当然，本文的这些小例子仅仅从侧面表述了笔者的一些个人观点，要充分体现Delphi的高效性，这些还远远不够！限于篇幅，关于数据库以及其他高级话题在这里均未涉及，特别是数据库编程方面，Delphi提供了相当的灵活性！当然，万变不离其宗，只要随时注意Delphi是完全面向对象的，有对象就考虑其属性、事件、方法、继承、引用等等。

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有