read old *.MEM

General Help regarding HMG, Compilation, Linking, Samples

Moderator: Rathinagiri

Post Reply
User avatar
AUGE_OHR
Posts: 2117
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany

read old *.MEM

Post by AUGE_OHR »

hi,

i have some (old) Code which run under Cl*pper and Xbase++
i have try same Code under harbour and got 3 "missing"
FExists()
F2BIN()
BIN2F()
so i add

Code: Select all

#IFDEF __XPP__
#ELSE
   REQUEST HB_GT_WIN_DEFAULT
   #xTranslate FExists => File
#ENDIF
and in harbour *.HBC

Code: Select all

libs=hbxpp.hbc
but i got "empty" Result ... hm :o
why does Code not work under harbour ... only F2BIN() and BIN2F() can be the Problem

p.s. i have "extract" HB_FUNC from hbxpp and add i Demo Code
HB_MEMEDIT.ZIP
(2.25 KiB) Downloaded 69 times
have fun
Jimmy
User avatar
AUGE_OHR
Posts: 2117
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany

Re: read old *.MEM

Post by AUGE_OHR »

hi,

got it working :)

Result is a Array but harbour can´t "?" it

after

Code: Select all Expand view

Code: Select all

    ? hb_valToExp( aVars[i] )
it work under harbour
have fun
Jimmy
Post Reply