与大家分享一个简单的Delphi 文件比较的例子,注意:本示例只能对数据量较小的文件进地比较,运行后,需要指定源文件、目标文件,然后单击比较文件按钮,即可显示出比较结果: try SetLength(BufferA,StreamA.Size); SetLength(BufferB,StreamB.Size); if StreamA.SizeStreamB.Size then begin Application.MessageBox('文件比较结果:文件不同!','信息',64); end else begin
