FiveTech Software tech support forums

Posted: **Thu Aug 04, 2016 8:18 am**

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

EMG

Posted: **Thu Aug 04, 2016 8:32 am**

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

Posted: **Thu Aug 04, 2016 8:46 am**

FUNCTION MAIN()

    USE X_CT

    ? FIELD -> prv_email

    INKEY( 0 )

    RETURN NIL

EMG

Posted: **Thu Aug 04, 2016 10:18 am**

Found it!

It was the rddsys.prg I linked.

This gave me the problem:

Code: Select all | Expand


/***
*
*  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

Posted: **Thu Aug 04, 2016 10:29 am**

Great!

EMG

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?

Posted: **Thu Aug 04, 2016 7:45 pm**

You have to use a make file

Here you have an example:
viewtopic.php?f=6&t=28919

Posted: **Fri Aug 05, 2016 12:03 pm**

Thank you, I will take a look at it.

MemoEdit problem:

Code: Select all | Expand

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

Posted: **Fri Aug 05, 2016 12:06 pm**

elrosa wrote:Thank you, I will take a look at it.

MemoEdit problem:
Code: Select all | Expand
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: Select all | Expand

MemoEdit(tnmemo,11,3,24,76,.T.,'MemoControl',73,3)

MemoControl without ().

EMG

Posted: **Fri Aug 05, 2016 12:07 pm**

Also check that MemoControl() function is not STATIC. Ie:

Code: Select all | Expand

FUNCTION MemoControl()

not

Code: Select all | Expand

STATIC FUNCTION MemoControl()

EMG

Posted: **Fri Aug 05, 2016 12:22 pm**

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

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?

Posted: **Fri Aug 05, 2016 12:38 pm**

Try this:

Code: Select all | Expand

SetMode( <nRowCount>, <nColCount> ) --> lSuccess

EMG

FiveTech Software tech support forums

Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility

Re: Convert DOS application(s) to Harbour <== LIB compatibility