是否有任何实用程序重新格式化Delphi代码？

编辑

我正在使用Delphi 2006

一些反馈

感谢所有回答这个问题的人

我一直在使用JCF代码格式化程序 - 它运行良好,我的代码已经格式化为Object Pascal样式指南

我们的一位开发人员不断编写代码并将其置于版本控制中而不进行测试.因此,我们的代码质量受到了影响.

除了摆脱开发者之外,我该如何解决这个问题呢？

编辑

我和他谈了很多次,甚至还给了他书面警告

我的Delphi 2006应用程序遇到了一些性能问题.你能建议任何有助于我找到瓶颈的分析工具吗？

即像turbo Profiler这样的工具

XML日期和时间采用格式

' - '？yyyy' - 'mm' - 'dd'T'hh':'mm':'ss('.'s +)？(ZZZZZZ)？

是

• ' - '？yyyy是一个四位或更多数字的可选负数字,代表年份; 如果超过四位数,则禁止前导零,并禁止"0000"

•剩余的' - 是日期部分之间的分隔符;

•第一个mm是表示月份的两位数字;

•dd是代表日期的两位数字;

•'T'是一个分隔符,表示随后的时间;

•hh是一个代表小时的两位数字; 如果表示的分钟和秒为零,则允许"24",并且如此表示的dateTime值是第二天的第一个时刻(·值空间中的dateTime对象的小时属性·不能具有大于23的值) ;

•':'是时间部分的部分之间的分隔符;

•第二个mm是一个两位数的数字,表示分钟;

•ss是一个两位整数的数字,表示整秒;

•'.s +(如果存在)代表小数秒;

•zzzzzz(如果存在)表示时区(如下所述).

这里有更多的例子

简单示例 2009-08-31T19:30:00

更复杂的例子

2002-10-10T12:00:00-05:00(2002年10月10日中午,中部夏令时以及美国东部标准时间)是2002-10-10T17:00:00Z,比2002年晚5个小时-10-10T12:00:00Z.

有关详细信息,请参阅www.w3.org/TR/2004/REC-xmlschema-2-20041028/datatypes.html

嗨,在delphi中执行嵌套try和finally语句的最佳方法是什么？

var cds1  : TClientDataSet;
    cds2  : TClientDataSet;
    cds3  : TClientDataSet;
    cds4  : TClientDataSet;
begin
  cds1      := TClientDataSet.Create(application );
  try
    cds2      := TClientDataSet.Create(application );
    try
      cds3      := TClientDataSet.Create(application );
      try
        cds4      := TClientDataSet.Create(application );
        try
        ///////////////////////////////////////////////////////////////////////
        ///      DO WHAT NEEDS TO BE DONE
        ///////////////////////////////////////////////////////////////////////
        finally
          cds4.free;
        end;

      finally
        cds3.free;
      end;
    finally
      cds2.free;
    end;
  finally
    cds1.free;
  end;
end;

你能建议一个更好的方法吗？

当我在Delphi 2006下编译我的应用程序时,我收到以下警告[Pascal警告] - W1002符号'FileSetDate'特定于一个平台

我该怎么做才能抑制这个警告？

代码

MyLastError:= FileSetDate( Files[ i ].Handle, DateTimeToFileDate( arcDate ) );

我有一个班级,我正在与DUnit进行单元测试.它有一些方法,一些公共方法和私有方法.

type
  TAuth = class(TDataModule)
  private
    procedure PrivateMethod;
  public
    procedure PublicMethod;
  end;

为了为这个类编写单元测试,我必须公开所有的方法.

是否有一种不同的方式来声明私有方法,以便我仍然可以测试它们,但它们不公开？

我们正在开始一个基于8051微控制器的新项目.

问题:

1. 什么是最好的C编译器使用？
2. 有没有开源8051编译器,它们有多好？

我们使用的是MySQL 5.0版,大部分表都是InnoDB.我们运行复制到从属服务器.我们正在考虑每天备份MySQL日志文件.

问题

• 有没有其他方法可以在不使用日志文件的情况下进行增量备份？
• 进行增量备份时的最佳做法是什么？

STRAIGHT_JOIN这段代码做了什么？

SELECT  STRAIGHT_JOIN ClosingBalance    
FROM   Accounts 
WHERE idAccounts = FidDebit;