topic-29892

Posts: 537

Joined: Mon Jan 16, 2006 03:42 PM

CREAR ARCHIVO DE TEXTO
Posted: Tue Dec 30, 2014 03:50 PM

Amigos al hacer esto:

oPrn:=TDosPrn():New( "ARCHIVO.TXT" )
oPrn:Say(1,1,"HOLA;QUE TAL" )
oPrn:End()
el resultado es HOLA;QUE TAL y (al final me aparece un cuadradito)

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: CREAR ARCHIVO DE TEXTO
Posted: Tue Dec 30, 2014 05:37 PM

Jose,

Edita el fichero de texto con un editor hexadecimal y comprueba que byte tiene al final

regards, saludos

Antonio Linares
www.fivetechsoft.com

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: CREAR ARCHIVO DE TEXTO
Posted: Tue Dec 30, 2014 07:59 PM

Yo lo hago asi:

  cFileTxt := "texto.txt"
  
  nHandle:= FCREATE( cFileTxt )
  FWRITE(nHandle, "HOLA;QUE TAL")
  FCLOSE(nHandle)
  WinExec("NotePad.exe "+cFileTxt)

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

FiveTech Support Forums