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

Reply via email to