tag:blogger.com,1999:blog-29331675.post115581858788105209..comments2024-03-05T17:37:00.995+01:00Comments on The Delphi Geek: GpHugeFile 4.0gabr42http://www.blogger.com/profile/06903558857617342477noreply@blogger.comBlogger10125tag:blogger.com,1999:blog-29331675.post-3999121546063351982012-03-07T15:51:35.824+01:002012-03-07T15:51:35.824+01:00No, Windows 7 64 bits, but it's actually my fa...No, Windows 7 64 bits, but it's actually my fault, using Reset fixed the issue, ie.<br /><br />File64 := TGpHugeFile.Create('D:\_tests\large-file.bin');<br />File64.Reset;<br />File64.Seek(1024 * 1024 * 1024);<br />File64.Truncate;<br />File64.Close;<br /><br />Thanks!Gdhaminoreply@blogger.comtag:blogger.com,1999:blog-29331675.post-55491448160519979972012-03-07T15:23:00.346+01:002012-03-07T15:23:00.346+01:00Weird. Which operating system? Are you using Termi...Weird. Which operating system? Are you using Terminal Server?gabr42https://www.blogger.com/profile/06903558857617342477noreply@blogger.comtag:blogger.com,1999:blog-29331675.post-58063362348667287942012-03-07T08:44:18.736+01:002012-03-07T08:44:18.736+01:00I'm playing with TGpHugeFile to truncate huge ...I'm playing with TGpHugeFile to truncate huge files, but this code fail:<br /><br /> File64 := TGpHugeFile.Create('D:\_tests\large-file.bin');<br /> File64.Seek(1024 * 1024 * 1024);<br /> File64.Truncate;<br /> File64.Close;<br /><br />I tracked this down, CreateMutex() function call in the TGpHugeFile.Create() fail:<br /><br />hfWin32LogLock := CreateMutex(nil, false, '\Gp\TGpHugeFile\Win32Log\0B471316-65A0-44CC-B666-D9A28E4AE40B');<br /><br />Calling GetLastError() returned this 161 (ie. "ERROR_BAD_PATHNAME The specified path is invalid."<br /><br />Am I missing something? I'm using the latest version of TGpHugeFileGdhaminoreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1162383628210584272006-11-01T13:20:00.000+01:002006-11-01T13:20:00.000+01:00Hi,I've downloaded the latest version and now I ca...Hi,<BR/><BR/>I've downloaded the latest version and now I can compile without errors, thanks a lot.Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1162320301069072632006-10-31T19:45:00.000+01:002006-10-31T19:45:00.000+01:00This should also work, plus it's more readable, sh...This should also work, plus it's more readable, shorter and less error-prone:<BR/><BR/>{$IFDEF VER100}{$DEFINE D3PLUS}{$ENDIF}<BR/>{$IFDEF VER120}{$DEFINE D3PLUS}{$DEFINE D4PLUS}{$ENDIF}<BR/>{$IFDEF VER130}{$DEFINE D3PLUS}{$DEFINE D4PLUS}{$ENDIF}<BR/>{$IFDEF CONDITIONALEXPRESSIONS}<BR/> {$DEFINE D3PLUS}<BR/> {$DEFINE D4PLUS}<BR/> {$IF (RTLVersion >= 14)} // Delphi 6.0 or newer<BR/> {$DEFINE D6PLUS}<BR/> {$IFEND}<BR/> {$IF (RTLVersion >= 15)} // Delphi 7.0 or newer<BR/> {$DEFINE D7PLUS}<BR/> {$IFEND}<BR/> {$IF (RTLVersion >= 18)} // Delphi 2006 or newer<BR/> {$DEFINE D10PLUS}<BR/> {$IFEND}<BR/>{$ENDIF}gabr42https://www.blogger.com/profile/06903558857617342477noreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1162318331077198502006-10-31T19:12:00.000+01:002006-10-31T19:12:00.000+01:00It seems that the IFDEF block at the beginning of ...It seems that the IFDEF block at the beginning of unit is broken.<BR/><BR/>Can you please replace it with <BR/><BR/>{$DEFINE D3PLUS}<BR/>{$DEFINE D4PLUS}<BR/>{$DEFINE D6PLUS}<BR/>{$DEFINE D7PLUS}<BR/>{$IFDEF VER100}{$UNDEF D4PLUS}{$UNDEF D6PLUS}{$UNDEF D7PLUS}{$ENDIF}<BR/>{$IFDEF VER110}{$UNDEF D6PLUS}{$UNDEF D7PLUS}{$ENDIF}<BR/>{$IFDEF VER120}{$UNDEF D6PLUS}{$UNDEF D7PLUS}{$ENDIF}<BR/>{$IFDEF VER130}{$UNDEF D6PLUS}{$UNDEF D7PLUS}{$ENDIF}<BR/>{$IFDEF VER140}{$UNDEF D7PLUS}{$ENDIF}<BR/>{$IFDEF CONDITIONALEXPRESSIONS}<BR/> {$IF (RTLVersion >= 18)} // Delphi 2006 or newer<BR/> {$DEFINE D10PLUS}<BR/> {$IFEND}<BR/>{$ENDIF}<BR/><BR/>and check if it helps?gabr42https://www.blogger.com/profile/06903558857617342477noreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1162318080749956762006-10-31T19:08:00.000+01:002006-10-31T19:08:00.000+01:00It seems that I forgot to include DSiWin32 unit in...It seems that I forgot to include DSiWin32 unit in the distribution.<BR/><BR/>At the moment you can get it from <A HREF="http://gp.17slon.com/gp/files/dsiwin32.zip" REL="nofollow">http://gp.17slon.com/gp/files/dsiwin32.zip</A>.<BR/><BR/>As for the other problem - I probably made some changes that made the code incompatible with D6. I can only test with D7 and above so it may take a while before I can fix it. Have you considered upgrading to <A HREF="http://www.turboexplorer.com/delphi" REL="nofollow">Turbo Delphi Explorer</A>?gabr42https://www.blogger.com/profile/06903558857617342477noreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1162309952833108282006-10-31T16:52:00.000+01:002006-10-31T16:52:00.000+01:00Hi,Thanks for creating GpHugeFile and making it av...Hi,<BR/><BR/>Thanks for creating GpHugeFile and making it available.<BR/><BR/>When I compile it under D6 I get following errors:<BR/><BR/>[Error] gphugef.pas(486): Method 'GetSize' not found in base class<BR/>[Fatal Error] gphugef.pas(527): File not found: 'DSiWin32.dcu'<BR/><BR/>The previous version used to compile without any errors.Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1156662891447042972006-08-27T09:14:00.000+02:002006-08-27T09:14:00.000+02:00Being the object, you must create TGpHugeFile inst...Being the object, you must create TGpHugeFile instance as an object, i.e. with f := TGpHugeFile.Create('c:\test.txt').<BR/><BR/>Of course, you must then destroy it with FreeAndNil(f).gabr42https://www.blogger.com/profile/06903558857617342477noreply@blogger.comtag:blogger.com,1999:blog-29331675.post-1156609121556577352006-08-26T18:18:00.000+02:002006-08-26T18:18:00.000+02:00Hi,that unit looks exactly like what I'm looking f...Hi,<BR/><BR/>that unit looks exactly like what I'm looking for. I've got an ill disk that will only run for some minutes and then stop. And I need to get some huge files from that disk, so I thought about writing an incremental copy tool by myself.<BR/><BR/>But when I compiled a stub with just f.create ( 'c:\test.txt' ); <BR/>it raises an eaccessviolation in oleaut32.dll. I'm using BDS 2006 on W2k. Do you have any suggestion what's going wrong?<BR/><BR/>HeribertAnonymousnoreply@blogger.com