Club Delphi  
    Paypal   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

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #17  
Antiguo 16-11-2011
pofi pofi is offline
Registrado
NULL
 
Registrado: abr 2011
Posts: 1
Poder: 0
pofi Va por buen camino
Salvar dynamic Arrays en File

me he encontrado con el mismo problema, en mi caso al definir MyFile= file of String.
el problema viene siendo el mismo, los archivos (file) necesitan finalizacion.

se me ha ocurrido una solucion para guardar este tipo de datos siempre que los datos puedan ser interpretados como una cadena de caracteres (String o AnsiString) usando la propiedad de TStringList.SaveToFile y el formato de archivo '.csv' (datos separados por comas), se puede hacer algo asi:
Código SQL [-]
Procedure PassarArchivo(Arreglo: Array of Array of Integer; Alto, Ancho: Integer);
Var    
  i,j: integer;
  Fila: String; // o AnsiString si se necesita mas espacio, aunque todo tiene un limite;
  Tabla: TStringList;
Begin
   Tabla:=TStringList.Create;
   For i:=0 to Alto do
   begin
      Fila:= ''; // Vaciar Fila
      For j:=0 to Ancho do
         Fila:= Fila+IntToStr(Arreglo[i,j])+';'; // no olvidarse del ';' que separa los valores
     Tabla.add(Filla) // usando la funcion add, no hace falta definir la magnitud
   end;
   Tabla.SaveToFile('direccion\nombreArchivo.csv');
   Tabla.Destroy; //libera la memoria
end;

**El formato de archivo *.csv tiene la ventaja de poder-se abrir desde Excel.

Desgraciadamente esta solucion no sirve en mi caso porque los datos que quiero guardar son mas complejos, asi que sigan pensando en otra solucion. gracias
Responder Con Cita
 


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
Que estoy haciendo mal ? piolillo Internet 8 28-07-2011 17:23:24
Que estoy haciendo mal con este trigger @-Soft Firebird e Interbase 6 25-01-2011 02:37:35
Uso de clases, ¿que estoy haciendo mal? gerardorom C++ Builder 2 26-12-2007 15:35:38
Que estoy haciendo Mal esimon SQL 4 04-07-2006 21:55:25
Que estoy Haciendo mal jostrix PHP 1 01-11-2004 01:29:16


La franja horaria es GMT +2. Ahora son las 07:10:49.


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