OpenEuphoria

Re: win v3.1 vs v4.0

• Posted by "Wolf" <wolfritz at king.igs.net> Jul 07, 2004
• 441 views

-- caution, old stuff!
-- set Windows GUI version -- for any EU?, or only 2.3? <<<<
include file.e
include get.e
constant new_version = {4,0,0}   -- or {3, 0, 10} for 3.1
integer fn
fn = open("exw.exe", "ub") -- or  pdexw.exe
if seek(fn, #C8) != 0 then
    puts(2, "1st seek failed\n")
    abort(1)
end if
puts(2, "Initially:\n")
? get_bytes(fn, 3)
if seek(fn, #C8) != 0 then
    puts(2, "2nd seek failed\n")
    abort(1)
end if
puts(fn, new_version)
puts(1, "Now:\n")
? new_version
close(fn)

... btw, Kat, stupid question, maybe, but how many free clusters do you have
on that partition before you start ?, tho I still think 'buggy' file name
may be causing problem...
... looking at urlmon.h, seems like a "part_of" IE, so good luck trying to
'split' that.