[DUG] Server 2019

[Jay Daley]

John

I don’t have the code to hand but I had a similar problem though not on a server, and changing the default block read size to 64k fixed it.

Jay

> On 18/12/2020, at 10:42 AM, John Bird <johnkbird at xtra.co.nz> wrote:
> 
> Anyone had issues with Delphi software on server 2019?
>  
> I have some software that is having issues on a server:
> Delphi 2007 calling win32 standard call  CopyFile(Pchar(sourcefile), PChar(Destfilename), False)   is failing on some larger files with file not found – it does not copy the file
>   standard TFilestream code such as below is running extremely slowly
> byteoffset := (recnum - 1) * lreclen2; 
> fs.seek(byteoffset, soFromBeginning); 
> sizeread := fs.read(chbuff, lreclen2);
> Server is using SMB2 not SMB1 which introduces apparently a whole lot of read-ahead behaviour 
>  
> Anyone know anything of such issues?
>  
>  
>  
> _______________________________________________
> NZ Borland Developers Group - Delphi mailing list
> Post: delphi at listserver.123.net.nz <mailto:delphi at listserver.123.net.nz>
> Admin: http://delphi.org.nz/mailman/listinfo/delphi <http://delphi.org.nz/mailman/listinfo/delphi>
> Unsubscribe: send an email to delphi-request at listserver.123.net.nz <mailto:delphi-request at listserver.123.net.nz> with Subject: unsubscribe

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://listserver.123.net.nz/pipermail/delphi/attachments/20201218/5d99a2ce/attachment.html