Delphi中建议使用的语句

Delphi中建议使用的语句
楼主zswang（伴水清清)(专家门诊清洁工）2002-05-15 13:37:54 在 Delphi / VCL组件开发及应用 提问
No.1   判断逻辑类型  
  var   B:   Boolean;  
  begin  
      B   :=   Boolean(2);   //这样只是为了调试//B   :=   True;  
      if   B   =   True   then   ShowMessage('B   =   True');   //不建议//不安全  
  ///////  
      if   B   then   ShowMessage('B');   //建议//简短  
  end;  
   
  var   B:   Boolean;  
  begin  
      if   Edit1.Text   =   '是'   then   //不建议//烦琐  
          B   :=   True  
      else   B   :=   False;  
  ///////  
      B   :=   Edit1.Text   =   '是';   //建议//简短  
  end;  
   
  No.2   临时SQL查询  
  begin  
      QueryTemp.Close;  
      QueryTemp.SQL.Text   :=   'SELECT   SUM(金额)   AS   合计   from   销售表';  
      QueryTemp.Open;   //不建议//数据没有关闭造成资源浪费  
      ShowMessage(Query1.FieldByName('合计').AsString);  
  /////  
      QueryTemp.SQL.Text   :=   'SELECT   SUM(金额)   AS   合计   from   销售表';  
      QueryTemp.Open;  
      ShowMessage(Query1.FieldByName('合计').AsString);  
      QueryTemp.Close;   //建议用//使用完就关闭  
  end;  
   
  No.3   获取记录数  
  var  
  &n