Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-08-2012
ASAPLTDA ASAPLTDA is offline
Miembro
 
Registrado: jun 2003
Ubicación: COLOMBIA-CALI
Posts: 639
Poder: 24
ASAPLTDA Va por buen camino
Smile Problemas Lectura Archivo CSV

Apreciados Foristas,
He recibido un archivo de texto. El archivo es la exportacion de un sistema de SQLSERVER 2008 y los campos vienen delimitados con punto y coma (
Cuando los veo los con el editor de Notepad ++ se ven bien, cada registro tiene su registro final con CRLF indicando el final del registro , despues del ultimo registro no tiene campos de control visibles con notepad ++.
Para leer el archivo de datos utilizo el siguiente codigo utilizando delphi 5
Código:
  Readln(w_F, w_string);
  w_string := Trim(w_string)  ;
  While not (Eof(w_F)) OR (w_string  > '') do begin
     Inc(g_leidos);
    //LOAD_MEMO(W_STRING);
    LOAD_DATASET(W_STRING);
    w_string:='';
    Readln(w_F, w_string);
  end;
  CloseFile(w_F);
Pero no lee los registros , como si no los reconociera
Abri el Archivo con notepad++ copie los datos al clickboard y los copie a un notepad microsoft salve la informacion con otro nombre y ejecute de nuevo la lectura de datos, y ahi si funciono en forma correcta

Abri el archivo usando

Código Delphi [-]
  MemoCSV.Lines.Clear;  // PRUEBAS
  OpenDialog1.FileName:= '*.CSV';
  OpenDialog1.Execute;
  MemoCSV.Lines.LoadFromFile(OpenDialog1.FileName);

y como resultado obtengo solo 3 caracteres en el campo memo, pero son campos como de control

Ahora utilice el codigo usando delphi xe2
Código Delphi [-]
  MemoCSV.Lines.Clear;  // PRUEBAS
  OpenDialog1.FileName:= '*.CSV';
  OpenDialog1.Execute;
  MemoCSV.Lines.LoadFromFile(OpenDialog1.FileName);
y los datos aparecen en el campo memo en forma normal los cuales son comno 1500 registros

No uso delphi Xe2 ya que estamos apenas estamos migrando a esta nueva version de delphi

Puede alguno de ustedes darme alguno idea o si ha tenido el mismo problema y su solucion

Gracias

Adjunto una oparte del texto a importar
Cita:
RE;146 ;16208018-5 ;GOMEZ VELASQUEZ RAMIRO ;2012-06-21 00:00:00.000;CRA 9 # 9-17 ;(052 ) 211 38 38 ;CARTAGO ;VALLE ;11:20;455019515110 ;195/60 R15 88H KR10 ;BOD6
;2.0000000;1;
Responder Con Cita
 



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
Lectura de archivo en paralelo jars OOP 0 19-12-2011 14:31:10
Ayuda con Lectura de archivo fleming Varios 14 07-09-2010 10:22:56
Lectura de un archivo plano josem Varios 2 13-09-2006 23:06:39
Lectura continua de Archivo friendspark API de Windows 2 02-02-2006 16:27:52
lectura lenta de un archivo .DAT, ¿por que? URBANO Varios 3 09-12-2003 21:07:16


La franja horaria es GMT +2. Ahora son las 18:12:05.


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