Thanks, Ken. I like this idea. The only little problem with this approach, what it assumes fixed record lenght of the file. If File is comma-delimited (as it was in my case), records have different length.

>Hi Nadya,
>
>Here's a method I've used before:
>

* ThisForm.ImportFile() Method
>
>	Thisform.cntBar.width = 0 			&& Container object used as thermometer
>
>	=thisform.getfsize(thisform.txtFileName.value)
>	Append from (thisform.txtFileName.value)  delimited with " for thisform.increment()
>
>* ThisForm.GetFSize() Method"
>
>	Parameter cFileName
>	Set deci to 17
>	fh 		= fopen(cFileName,10)		&& Open the file
>	nEnd 		= FSEEK(fh, 0, 2) 		&& Move pointer to EOF
>	=fclose(fh)					&& Close the file
>	fh 		= fopen(cFileName,10)		&& Open the file
>	nRec 		= len(Fgets(fh))		&& Get record size
>	=fclose(fh)					&& Close the file
>
>	nBarMax 	= thisform.pageframe1.pgUpdate.cntStatus.width -2
>	Thisform.nBarIncr	= nBarMax/(nEnd/nRec)	&& Calc and store increment value
>	Return .t.
>
>* ThisForm.Increment() Method
>
>	Thisform.cntBar.width = thisform.cntBar.width + thisform.nBarIncr
>

>
>>Hi everyone,
>>
>>Just curios, is it possible to add thermometer during Append From (txtFile) type delimited? I just appended 5mln. records text file and it was not user friendly to see just wait window (fortunately, nobody except me has seen this :))
>>
>>Thanks in advance.