Como puedo crear un fichero de texto

Como puedo crear un fichero de texto

Postby mjcc » Wed Apr 19, 2006 1:55 pm

Como puedo crear un fichero de texto dentro de la pokect con unos determinados valores.

gracias.
mjcc
 
Posts: 139
Joined: Fri Apr 07, 2006 9:16 pm

Postby Antonio Linares » Wed Apr 19, 2006 3:00 pm

MemoWrit( <cFileName>, <cText> )
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42107
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Lo siento, me he explicado mal

Postby mjcc » Wed Apr 19, 2006 7:36 pm

Necesito grabar un fichero de texto con varias lineas. Por otro lado necesito leer ese mismo fichero de datos.
¿ como puedo realizar estas operaciones ?
gracias.

Otra pregunta mas por favor, he visto la siguiente instruccion en la ayuda de fwppc, PARA QUE SIRVE

oReport ...

COLUMN ...

COLUMN ...

END REPORT

GROUP ON …

GROUP ON …

ACTIVATE REPORT oReport ...

e incluso la posibilidad de impresion !!!!!!

Gracias
mjcc
 
Posts: 139
Joined: Fri Apr 07, 2006 9:16 pm

Postby Antonio Linares » Thu Apr 20, 2006 9:53 am

Manuel,

Puedes grabar varias líneas usando Chr( 13 ) + Chr( 10 ):

local cTexto := "Hola" + Chr( 13 ) + Chr( 10 ) + "mundo" + Chr( 13 ) + Chr( 10 ) + "Test"

MemoWrit( "test.txt", cTexto )

Respecto a los reportes y a la impresión, los comandos y clases que has visto son para la versión de FiveWin para PC. No están disponibles aún para FiveWin para Pocket PC.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42107
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Y como puedo leer este fichero posteriormente.

Postby mjcc » Thu Apr 20, 2006 2:06 pm

Y como puedo leer este fichero posteriormente.
Gracias.
mjcc
 
Posts: 139
Joined: Fri Apr 07, 2006 9:16 pm

Postby Carles » Thu Apr 20, 2006 2:07 pm

Manuel,

MsgInfo( MemoRead( 'test.txt' ) )
Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
User avatar
Carles
 
Posts: 1137
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

OK, pero si quiero leer linea a linea

Postby mjcc » Thu Apr 20, 2006 2:10 pm

OK, pero si quiero leer linea a linea
mjcc
 
Posts: 139
Joined: Fri Apr 07, 2006 9:16 pm

Postby Carles » Thu Apr 20, 2006 2:33 pm

Hola,

No he probado las funciones de bajo nivel de gestion de ficheros, pero en principio algo asi tyendria de funcionar.

Code: Select all  Expand view  RUN
   nLineas := MLCOUNT( x )

   FOR nI := 1 TO nLineas
        msginfo( MEMOLINE( x, , nI ) )
   NEXT


Clipper/Harbour puro !
Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
Skype -> https://join.skype.com/cnzQg3Kr1dnk
User avatar
Carles
 
Posts: 1137
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona


Return to FiveWin para Pocket PC

Who is online

Users browsing this forum: No registered users and 1 guest