This code fails in some machines :
WITH OBJECT oSheet
FOR EACH aData IN aaData
nCol := HB_EnumIndex()
WITH OBJECT oSheet:Columns( nCol )
// Ancho
:ColumnWidth := anWidth[nCol]
END WITH
NEXT
END WITH
and this works always:
WITH OBJECT oSheet
nCol := 0
FOR EACH aData IN aaData
nCol++
WITH OBJECT oSheet:Columns( nCol )
// Ancho
:ColumnWidth := anWidth[nCol]
END WITH
NEXT
END WITH
Its difficult to reproduce, because the same exe works or fail depending of the
machine.
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de
virus 4442 (20090921) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com
------------------------------------------------------------------------------
Come build with us! The BlackBerry® Developer Conference in SF, CA
is the only developer event you need to attend this year. Jumpstart your
developing skills, take BlackBerry mobile applications to market and stay
ahead of the curve. Join us from November 9-12, 2009. Register now!
http://p.sf.net/sfu/devconf
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers