Ejemplo 4. Paso 9.2: campo Total Amount, elemento TotalAmount

If not kwTotal.IsNull Then
// Si se ha detectado el nombre de campo kwTotal
{
WholeWordMode: true;
MaxGapInLine: 30dt;
RectArray DataRegion;
Let r1= Rect (kwTotal.Rect.Right, kwTotal.Rect.Top -20dt, kwTotal.Rect.Right + 1800dt, kwTotal.Rect.Bottom + 50dt);
// Limita el área de búsqueda a un rectángulo situado a la derecha del nombre de campo.
Let r2 = Rect (kwTotal.Rect.Left - 100dt, kwTotal.Rect.Bottom, kwTotal.Rect.Right + 100dt, kwTotal.Rect.Bottom + 200dt);
// Limita el área de búsqueda a un rectángulo situado debajo del nombre de campo.
DataRegion = RectArray (r1);
DataRegion.Add (r2);
RestrictSearchArea (DataRegion);
}
else Dontfind();
// En caso contrario, no buscar el objeto.

If not IsNull then
{FuzzyQuality: 400dt - width, {-50000,0,0, 50000}*dt;
//Las hypotheses de elements con una region de 400 dots de ancho tendrán la calidad máxima
if width < 50dt then Quality: 0;
// Los Elements de menos de 50 dots no se tienen en cuenta
if Top > kwTotal.Rect.Top then
{ FuzzyQuality: Top - kwTotal.Rect.Top, {0,0,0, 20000}*dt;
}
}
//Esta comprobación implica que cuanto mayor sea la Difference, mayor será la penalización.

Rect outputRect;
outputRect = SumGroup.TotalAmount.Rect;
IsNull = SumGroup.TotalAmount.IsNull;
OutputRegion = outputRect;
OutputRegion.Inflate (5dt, 5dt);