Fotos en un grid

Saludos, es posible asignar una imagen diferente para
cada registro de un grid, tengo una columna que tiene un
control de tipo imagen, en el cual quiero asignar la foto
de cada uno de los nombres que figura en la columna2

select foto,nombre;
from alumnos;
into cursor query
this.recordSourceType=1
this.recordSource ='query'
this.sparce=.t.
n=1
Do While .not. eof('query')
this.ActivateCell(n,1)
this.column1.colFoto.Picture=query.foto
Skip 1 in 'query'
n=n+1
Enddo

Pero todos los registros muestran la misma foto

Gracias!!