Esta función creo que la has hecho tu...

Los parámetros son (para la versión 2.6) son:
nAncho
nAlto
nImgFormat
nQuality
lTransparent
Pero no se qué poner en nImgFormat para un JPG... ¿Cuales son los valores?
El uso habitual sería este...
MemoWrit( cNombrefichero, oPicture:MakeThumbNail(100,200, nImgFormat, 90,
..F.) ) //Grabar miniatura en formato JPG
¿no?
Saludos y gracias,
José Luis Capel