Xailer & OZ Software

I have a problem creating a new index. The code is:
WITH OBJECT ::oDbfTus // Class of TDbfDataSet
:Open()
IF :lOpen
:AddTag("ZAKLADNE","NAKLZ",, ".DATAtus",::oProgressBar1)
ENDIF
END WITH
Progressbar has all the default values.
After the indexing is finished, the progressbar shows cca. 75% of full size. What is
wrong?
The dbf file and the image are attached.
Gejza Horvath


Attached files TUS.DBF (19.4 KB)Â

Gejza,
This seems to work correctly on the DBFEditor. Please check with it.
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Gejza Horvath" <_hsoftkn@nextra.sk> escribió en el mensaje
news:[email=4652f7cb@ozsrv2.ozlan.local...]4652f7cb@ozsrv2.ozlan.local...[/email]
>I have a problem creating a new index. The code is:
>
> WITH OBJECT ::oDbfTus // Class of TDbfDataSet
> :Open()
>
> IF :lOpen
> :AddTag("ZAKLADNE","NAKLZ",, ".DATAtus",::oProgressBar1)
> ENDIF
> END WITH
>
> Progressbar has all the default values.
>
> After the indexing is finished, the progressbar shows cca. 75% of full
> size. What is wrong?
>
> The dbf file and the image are attached.
>
> Gejza Horvath
>
>