Hi,

It's ok now, I just wrote some external commands that use the 64 Bit Interface to do it. I reckon it would have been quicker to just change the code to use 64 bits in the Read/Write etc. routines then come up with the solution below!

All the Best
Dave

On 30 May 2007, at 05:22, J. Landman Gay wrote:

I actually got the following in my mailbox last week but was out of town for the weekend and I'm just catching up now. This is from Mark Waddingham:

I haven't had a chance to check this but something like the
> following might work (as a workaround):
on readFrom64 tFile, tFilePosition, tCount, @rData
    local tResult
    if tFilePosition <= 2147483647 then
        read from file tFile at tFilePosition for tCount
        put the result into tResult
        put it into rData
    else
        seek to 2147483647 in file tFile
        seek rel tFilePosition - 2147483647 in file tFile
        read from file tFile for tCount
        put the result into tResult
        put it into rData
    end if
    return tResult
end readFrom64
(mutatis mutandem for writeTo64)


_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to