img=LoadImage("F:\11.png") CBL_SetData(CBL_CF_DIB,Str(img))
BF%=CBL_GetDataFormat%() CBL_GetData(BF) For i=1 To CBL_OBJECTS_LIST(0) Print i+") "+CBL_OBJECTS_LIST(i) Next