diff options
| author | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2009-12-16 00:11:43 +0100 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2009-12-16 00:11:43 +0100 |
| commit | 52d72cf25a6bcff19e4a488102e3b7137bde0000 (patch) | |
| tree | 8fc2e05ddc92429ceca461b8a36b0ef16d8721b5 /UCore.pas | |
| parent | 8f034ebc019b1c9f6133814c439cf38f91f2bb13 (diff) | |
| download | tuxcmd-52d72cf25a6bcff19e4a488102e3b7137bde0000.tar.xz | |
Worker thread arguments cleanupv0.6.75
Diffstat (limited to 'UCore.pas')
| -rw-r--r-- | UCore.pas | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -45,7 +45,7 @@ procedure GetDirSize(AListView: TGTKListView; Engine: TPanelEngine; DataList: TL // Other classes procedure FillDefaultFstabMounterItems; -function CRCGetInfo(FileName: string; Engine: TPanelEngine; var TargetName: string; var TargetCRC: LongWord; var Size: Int64): boolean; +function CRCGetInfo(FileName: string; Engine: TPanelEngine; var TargetName: string; var TargetCRC: Cardinal; var Size: Int64): boolean; function WriteCRCFile(Sender: TObject; Engine: TPanelEngine; TargetFile, SplitFileName: string; const FileSize: Int64; const FileCRC: Longword): boolean; function ComputeBlockSize(TotalSize: Int64): longint; @@ -863,7 +863,7 @@ end; (********************************************************************************************************************************) (********************************************************************************************************************************) (********************************************************************************************************************************) -function CRCGetInfo(FileName: string; Engine: TPanelEngine; var TargetName: string; var TargetCRC: LongWord; var Size: Int64): boolean; +function CRCGetInfo(FileName: string; Engine: TPanelEngine; var TargetName: string; var TargetCRC: Cardinal; var Size: Int64): boolean; procedure ProcessLine(Str: string); var UPS: string; |