Ver Mensaje Individual
  #4  
Antiguo 02-02-2008
HOUDEL HOUDEL is offline
Miembro
 
Registrado: feb 2008
Ubicación: Mexico
Posts: 28
Reputación: 0
HOUDEL Va por buen camino
Thumbs up Como se realiza un archivo txt en delphi?

Gracias por contestarme,
la situacion es la siguiente Contpaq, es un sistema de contabilidad
que se utiliza mucho en las empresas,
tengo un sistema de contabilidad con polizas las cuales necesito pasarlas
a un archivo txt, tengo entendido que
con f:textfile y AssignFile(F, qry_Config.FieldByName('DIRTIC').AsString+'\'+'TicketIM.txt')
puedo creearlo ¿es esto correcto?
y con WriteLn(F,FnCentrar('',Dm_Ventas.Qry_BusEmpUsr.FieldbyName('NOMEMP').AsString,'',nAnchoDbl)); agregar ,
lo que no se es como delimitar los caracteres al insertarlos?
o necesito hacerlo desde el query?
Este es un ejemplo del archivo que debo crear apartir de un query.

P 20080202 1 1 1 0 ventas 1 1 0
M 04100-0006-0000 vent eq 1 700.00 0 0 ventas diarias
M 04100-0005-0000 bancos 0 700.00 0 0

hay alguna instruccion para dar espacios en el archivo, o que es lo que me
falta.

gracias.....
Responder Con Cita