FiveTech Software tech support forums

Antonio

This code hangs up using FWH Msvc Libs with the Dec 2005 build. However if I re-build with Borland FWH libs the below code works.

The MSVC FWH compile never goes to ALERT and the program hangs.

Rick Lipkin
SC Dept of Health, USA


MSGINFO( "GOING TO ALERT" )

SAYING := "There are records in the QUEUE that have not "+chr(13)+CHR(10)
SAYING += "been Transmitted. Do you wish to ...."+chr(13)+CHR(10)

YESNO := { " Resend ", " Delete " , " Abort " }
nOK := ALERT(SAYING, YESNO )

DO CASE
CASE nOK = 1
// do nothing and go on
CASE nOK = 2
SELECT PCASQUE
ZAP
OTHERWISE
CLOSE DATABASES
_Cleanup()
RETURN(.T.)
ENDCASE

Rick,

We have just tested it using FWH 2.7 January build and it works ok with both Borland and MSVC.