HMGforum.com

CarlosRD wrote:searching and investigating folders in 3.0.46 version, i found AUTOFILL sample and it has been very usefull to me. comes to me the idea to save new entries (which are not in "countries.lst") in the moment, without the user noticing. can someone help me?.

esgici wrote:Hola Carlos

CarlosRD wrote:searching and investigating folders in 3.0.46 version, i found AUTOFILL sample and it has been very usefull to me. comes to me the idea to save new entries (which are not in "countries.lst") in the moment, without the user noticing. can someone help me?.

Please look at here.

I hope it give an idea

Salodus

danielmaximiliano wrote:dentro de la misma carpeta HCFL se encuentra el archivo que necesitas

C:\hmg.3.1.1\hfcl\Samples\ComboSearchBox\countries.lst

[attachment=0]TextCrawler_2013-02-12_19-31-42.jpg[/attachment]

CarlosRD wrote:daniel, buenas tardes:

tengo algunos problemas con el manejo de array. he buscado en todos lo ejemplos y no encuentro como grabar los datos de un array en un archivo texto. puedes ayudarme?

estoy tratando de implementar en mi aplicacion el AUTOFILL, ya logre adicionar nuevos valores direfentes al array con el procedimiento abajo mencionado, pero ahora quiero grabar el array modificado en el mismo archivo de texto.

ejemplo:

para adicionar datos a un arreglo, se que es el aadd()
para ordenarlo, el asort()
para grabarlo nuevamente, ????????

te agrego el codigo que implemente y ojala pudieras ayudarme. gracias

onenter add_data() esta es una nueva instruccion al textbox

procedure add_data()
i=1
encontrado=.f.
newdata=frmAFTest.txbCountry.value
do while i<len(acountries)+1
datain:=acountries
if datain = newdata
encontrado=.t.
endif
i++
enddo
if !encontrado
aadd ( acountries,newdata )
endif
return

danielmaximiliano wrote:dentro de la misma carpeta HCFL se encuentra el archivo que necesitas

C:\hmg.3.1.1\hfcl\Samples\ComboSearchBox\countries.lst

[attachment=0]TextCrawler_2013-02-12_19-31-42.jpg[/attachment]

CarlosRD wrote:daniel, buenas tardes:

tengo algunos problemas con el manejo de array. he buscado en todos lo ejemplos y no encuentro como grabar los datos de un array en un archivo texto. puedes ayudarme?

FCREATE(<cFile>, [<nAttribute>]) --> nHandle

 Arguments

     <cFile> is the name of the file to create.  If the file already
     exists, its length is truncated to zero without warning.

     <nAttribute> is one of the binary file attributes shown in the table
     below.  If this argument is omitted, the default value is zero.

     Binary File Attributes
     ------------------------------------------------------------------------
     Value   Fileio.ch      Attribute Description
     ------------------------------------------------------------------------
     0       FC_NORMAL      Normal    Create normal read/write file (default)
     1       FC_READONLY    Read-only Create read-only file
     2       FC_HIDDEN      Hidden    Create hidden file
     4       FC_SYSTEM      System    Create system file
     ------------------------------------------------------------------------
 nOutfile := FCREATE("Newfile.txt", FC_NORMAL) 

FWRITE()
 Write to an open binary file
------------------------------------------------------------------------------
 Syntax

     FWRITE(<nHandle>, <cBuffer>, [<nBytes>])
        --> nBytesWritten

 Arguments

     <nHandle> is the file handle obtained from FOPEN(), FCREATE(), or
     predefined by DOS.

     <cBuffer> is the character string to write to the specified file.

     <nBytes> indicates the number of bytes to write beginning at the
     current file pointer position.  If omitted, the entire content of
     <cBuffer> is written.
      
    nOutfile := FCREATE("Newfile.txt", FC_NORMAL)
   
           IF FWRITE(nOutfile, cBuffer ) > 0
              ? "Write Ok"
           ELSE
              ? "Write fail"
           ENDIF
        
        FCLOSE(nOutfile)