Article ID: 191636
Article Last Modified on 5/12/2003
#DEFINE ARRAYSIZE 14
DIMENSION oRef[ARRAYSIZE]
FOR lni = 1 TO ARRAYSIZE
oRef[lni] = CREATEOBJECT("Toolbar")
oRef[lni].SHOW
oRef[lni].DOCK(1)
WAIT WINDOW "Creating "+ STR(lni) NOWA
ENDFOR
WAIT CLEAR
FOR lni = 1 TO ARRAYSIZE
WAIT WINDOW "Releasing "+ STR(lni) NOWA
oRef[lni] = .NULL. && Use this in VFP 5, 3.0b
ENDFOR
WAIT CLEAR
Additional query words: kbVFp300bbug kbVFp500abug kbVFp600fix kbXBase kbfvp600fix
Keywords: kbbug kbfix kbcode KB191636