Clipper conversion

[Templar]

Hello everyone. This is my first posting so forgive me if I'm getting it wrong. I am using HMG to update an ancient Clipper 5.2 application. Most of it works pretty well, but I am hitting one major problem. Who / where is the best palce to ask about this?

[Anand]

Who / where is the best palce to ask about this?

Welcome,

Who := All
Where := Here

Just post your query, to get solution, before the ink dries

Regards,

Anand

[esgici]

... Who / where is the best place to ask about this?

You are welcome

Answer is in perhaps no best but a better place

Happy HMG'ing

[Templar]

Ok: here goes. This is either an FAQ or weird.

The application opens fine in a medium window, but as soon as any new data is input and <Return> is pressed, it moves the screen up out of sight. Eg:
* Trial program
*
PROCEDURE MAIN
REQUEST HB_GT_WIN_DEFAULT
CLS
@1,1 TO 23,78 DOUBLE
ANS:=" "
@12,12 SAY "How are you?"
@12,25 GET ANS
READ
RK:=INKEY(0)
RETURN
Any suggestions?

[serge_girard]

Hi Templar,

Welcome from Belgium.

Maybe this helps:

Code: Select all

#include "hmg.ch"
PROCEDURE MAIN
REQUEST HB_GT_WIN_DEFAULT
CLS
@1,1 TO 23,78 DOUBLE
ANS:=" "
@12,12 SAY "How are you?"
@12,25 GET ANS
READ
//RK := INKEY(0)
? ans
wait""
RETURN 

Serge

[edk]

Hello Templar,
Greetings from Poland.

In my opinion, this should solve your issue:

Code: Select all

PROCEDURE MAIN
REQUEST HB_GT_WIN_DEFAULT
SetMode(25,80)
CLS
@1,1 TO 23,78 DOUBLE
ANS:="      "
@12,12 SAY "How are you?"
@12,25 GET ANS
READ
RK:=INKEY(0)
RETURN

Edward.

[Templar]

You, Sir, are a genius! That works perfectly. Thank you.

[Templar]

Hi Serge,
Thanks for that suggestion, but in fact Edk's solution worked better. Thanks for the help, though.

As a amtter of interest, you suggest including "hmg.ch" What is in that?

[serge_girard]

Alan,

You will need hmg.ch in every program you will compile with the HMG IDE. These are definitions for HMG.

Serge

[edk]

You, Sir, are a genius! That works perfectly. Thank you.

Please, do not call me Sir, because I haven't been honored by Queen Elizabeth II
Just Edward.
And I'm not a genius, it's just usual experience.

Edward.