ACHOICE() behaves differently in Harbour than Clipper. In Clipper, the code
below will not have achoicef() called, as it knows that there is no point to
run it.. probably because the pFNames array is blank. Harbour however, will
try to run it, causing "array access" error.
--- code ---
func main()
Priv pFNames:={} // privates needed by achoice's function
AChoice(1,0,10,20,pFNames,,"achoicef",1,1)
return nil
Func achoicef(nMode,nItem)
? pFNames[nItem]
wait
return
--
smu johnson <[email protected]>
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour