FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for CA-Clipper Convert DOS application(s) to Harbour <== LIB compatibility
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 08:18 AM

Sorry, I can't help you farther. It works fine here.

EMG

Posts: 23
Joined: Thu Jul 28, 2016 09:31 AM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 08:32 AM

May I ask how did you test the DBF which I had sent you?

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 08:46 AM
Code (fw): Select all Collapse
FUNCTION MAIN()

    USE X_CT

    ? FIELD -> prv_email

    INKEY( 0 )

    RETURN NIL


EMG
Posts: 23
Joined: Thu Jul 28, 2016 09:31 AM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 10:18 AM
Found it!

It was the rddsys.prg I linked.

This gave me the problem:
Code (fw): Select all Collapse
/***
*
*  RddSys.prg
*
*  This program is run each time your application is started to setup
*  the proper default driver.  You should modify a copy of this file
*  if you wish to use a default RDD other than DBFNTX.
*
*  Copyright (c) 1993, Computer Associates International, Inc.
*  All rights reserved.
*
*/

ANNOUNCE RDDSYS                        // This line must not change

INIT PROCEDURE RddInit
   REQUEST DBFCDX                      // Causes DBFNTX RDD to be linked in
                               
   rddSetDefault( "DBFCDX" )           // Set up DBFNTX as default driver

   RETURN

// eof: rddsys.prg
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 10:29 AM

Great! :-)

EMG

Posts: 23
Joined: Thu Jul 28, 2016 09:31 AM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 11:53 AM

Thanks for (all) your help.

How do i tell the compiler only to compile the PRG I changed and not all PRGs?

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Thu Aug 04, 2016 07:45 PM

You have to use a make file

Here you have an example:

viewtopic.php?f=6t=28919

&

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 23
Joined: Thu Jul 28, 2016 09:31 AM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Fri Aug 05, 2016 12:03 PM
Thank you, I will take a look at it.

MemoEdit problem:
Code (fw): Select all Collapse
MemoEdit(tnmemo,11,3,24,76,.T.,'MemoControl()',73,3)


This seems not to work anymore? Getting error Undefined function: MemoControl()

Is there an example of how to use memoedit with user defined controls?

Maarten
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Fri Aug 05, 2016 12:06 PM
elrosa wrote:Thank you, I will take a look at it.

MemoEdit problem:
Code (fw): Select all Collapse
MemoEdit(tnmemo,11,3,24,76,.T.,'MemoControl()',73,3)


This seems not to work anymore? Getting error Undefined function: MemoControl()

Is there an example of how to use memoedit with user defined controls?

Maarten


Try this:

Code (fw): Select all Collapse
MemoEdit(tnmemo,11,3,24,76,.T.,'MemoControl',73,3)


MemoControl without ().

EMG
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Fri Aug 05, 2016 12:07 PM
Also check that MemoControl() function is not STATIC. Ie:

Code (fw): Select all Collapse
FUNCTION MemoControl()


not

Code (fw): Select all Collapse
STATIC FUNCTION MemoControl()


EMG
Posts: 23
Joined: Thu Jul 28, 2016 09:31 AM
Re: Convert DOS application(s) to Harbour <== LIB compatibility
Posted: Fri Aug 05, 2016 12:22 PM

<shame icon>
Eh, thank you... need a holiday.. 3 hours to go.
</shame icon>

Posts: 23
Joined: Thu Jul 28, 2016 09:31 AM
Re: Convert DOS application(s) to Harbour &lt;== LIB compatibility
Posted: Fri Aug 05, 2016 12:34 PM

Last question before my holiday: Is there a substitute for the EGA43() and VGA28() functions? So that you can swith to 43 lines and 28 Lines?

Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM
Re: Convert DOS application(s) to Harbour &lt;== LIB compatibility
Posted: Fri Aug 05, 2016 12:38 PM
Try this:

Code (fw): Select all Collapse
SetMode( <nRowCount>, <nColCount> ) --> lSuccess


EMG

Continue the discussion