Subversion Repositories checksum-tools

Compare Revisions

Regard whitespace Rev 2 → Rev 6

/trunk/Windows/Common.pas
2,6 → 2,9
 
interface
 
uses
Classes;
 
type
TChecksum = class(TObject)
public
8,6 → 11,14
checksum: string;
end;
 
TCheckSumFile = class(TObject)
public
constructor Create(AFileName: string); virtual; abstract;
procedure ToStringList(slOut: TStringList); virtual; abstract;
function SingleFileChecksum(AFileName: string): string; virtual; abstract;
function MergeLine(AFileName, ACheckSum: string): string; virtual; abstract;
end;
 
implementation
 
end.