Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-12-2006
newdelphi7 newdelphi7 is offline
Miembro
 
Registrado: may 2006
Posts: 36
Poder: 0
newdelphi7 Va por buen camino
Leer un Archivo

Estoy haciendo una aplicacion en PHP y no encontre forma de pasarle los comandos de ESC para hacer imprimir una impresora Star Sp200 y/o Epson Tm-300, por lo que al final termine guardando los datos a imprimir en un archivo "imprimir.TXT"

La idea es realizar una aplicacion en Delphi que lea los datos en el fichero imprimir.txt y lo mande directamente a la impresora con este comando:
var
iImpresora : TextFile;
begin
Assignfile(iImpresora,'Lpt1');

Rewrite(iImpresora);
Writeln(iImpresora,' AQUI IRIA LO QUE VA A LEER EN CADA LINEA y SERA LO QUE SALDRA EN LA IMPRESORA');
CloseFile(iImpresora);
end;


Aqui mi pregunta: el fichero consta de 15 a 25 Lineas promedio me gustaria saber como puedo yo leer el fichero linea por linea e irlo guardando en una variable hasta que sea fin de archivo y no se imprima mas..... Nota: cada linea tiene como 30 caracteres mas o menos...

Solo quiero saber como abro y leo el fichero linea por linea y lo almaceno en una variable o hasta en un arreglo hasta que sea fin de archivo... GRACIAS
Responder Con Cita
  #2  
Antiguo 12-12-2006
Gydba Gydba is offline
Miembro
 
Registrado: ene 2004
Ubicación: Argentina
Posts: 673
Poder: 21
Gydba Va por buen camino
Bunos días,

Pues la manera más simple (aunque no tan eficiente) quizás sería utiliar un objeto TStringList con su respectivo método LoadFromFile y luego recorrer los items del objeto como si fueran filas, puesto que divide según encuentre CR.
El problema es el evidente: si en el archivo que generas escribís los famosos NULL CHARS vas a encontrarte con ciertos inconvenientes.

Espero que orientarte en algo, de última solamente chifla
__________________
Suerte
.: Gydba :.
Responder Con Cita
  #3  
Antiguo 12-12-2006
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Poder: 22
Bicho Va por buen camino
Hola, ha newdelphi7 ya le han contestado aquí, por cierto newdelphi, por favor, no repitas hilos.
Leete la Guía de estilo

Saludos
Responder Con Cita
  #4  
Antiguo 12-12-2006
Gydba Gydba is offline
Miembro
 
Registrado: ene 2004
Ubicación: Argentina
Posts: 673
Poder: 21
Gydba Va por buen camino
Ups, perdón, no he pasado aun por ahí por lo que mis disculpas al moderador.
__________________
Suerte
.: Gydba :.
Responder Con Cita
  #5  
Antiguo 12-12-2006
newdelphi7 newdelphi7 is offline
Miembro
 
Registrado: may 2006
Posts: 36
Poder: 0
newdelphi7 Va por buen camino
Perdon Al Moderador

Disculpa el inconveniente por repeti el ilo, en realidad cuando lo postee lo volvi a repensar y dije bueno creo que sera mejor ponerlo aqui en VArios que en Impresion....

Disculpa y gracias por todo, me ha gustado lo atento que estan de los foros y la rapidez en que se puede recibir una ayuda por alguien mas experto que uno en la materia.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Leer un archivo (rss)xml en c++ Maximiliano C++ Builder 1 14-07-2006 23:49:23
problemas al leer archivo pdf smendo PHP 0 21-07-2005 10:38:33
leer de un archivo javikanin Varios 3 23-11-2004 20:34:32
Leer versión de un archivo ejecutable FerPetrei Windows 2 16-01-2004 20:41:42
leer archivo de excel en delphi JavierR Conexión con bases de datos 0 13-07-2003 03:56:49


La franja horaria es GMT +2. Ahora son las 19:26:17.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi