Migrating from CA-Clipper 5.2e to xHarbour (Part III)

Having managed to recompile an actual DOS-based CA-Clipper EXE to a XHarbour W32 EXE, the next question is does it work

1) Launch FAS.EXE... so far so good

2) Input User Name & press enter, it bombs with the message

Error BASE/1003 variable does not exist GETLIST
Error at ...: MAIN_PASS(1051) in Module: FAS_MAIN.PRG
Called from : PASS_SCR(234) in Module: FAS_MAIN.PRG
Called from : MAIN(125) in Module: FAS_MAIN.PRG


Solution by Michael Hagl via comp.lang.xharbour

Add LOCAL getlist:={} to MAIN_PASS.PRG

Status : FAS.EXE can now run but now getting a weird ALERT() positioning as reported to
http://groups.google.com/group/comp.lang.xharbour/browse_thread/thread/44d58ac09e95f332#

Solution :
// Ron Pinkas 27/2/09
SetMode( 25, 80 )

Updated 2nd March 2009

Conclusion :

We started with FAS4DOS (CA-Clipper 5.2e)


What I got was a true Win32 executable but it looks exactly the same as FAS4DOS (minus the effect of Funckys' background function CLS() ) :-(


So how did I get the following screen-shot ? ;-)

Notice that the Window is centred and displays the EXE name instead of the C:\PATH\EXENAME and looks bigger...

So, how did I do it ?