FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
De una tabla a un archivo texto
Hola a todos espero esten bien, quiero ver si me pueden ayudar con un problema que tengo, quiero pasar de una tabla a un archivo texto los registros que contiene la tabla esto para ese archivo texto me funcione en una importacion que tengo que hacer, asea que tomar la informacion de la tabla y crear un archivo texto y que ahi contenga la informacion de la tabla pero en el archivo, espero me entiendan y me puedan ayudar.
muchas gracias y saludos.... |
#2
|
||||
|
||||
Una forma rápida de implementarlo sería recorriendo la tabla y por cada registro agregar una línea al archivo de texto formada por los valores de los campos separados por comas:
Código:
var Lineas: TStringList; Linea: String; begin Lineas := TStringList.Create; while not Table.Eof do begin Linea := ''; for I := 0 to Table.Fields.Count - 1 do if Linea = '' then Linea := Table.Fields[i].AsString else Linea := Linea + ',' + Table.Fields[i].AsString; Lineas.Add(Linea); Table.Next; end; Lineas.SaveToFile('tuarchivo.txt'); Lineas.Free; end; // Saludos |
#3
|
||||
|
||||
Supongo que te hayas dado cuenta que a nuestro amigo y moderador Román se le olvidó declarar la variable I.
Código:
var Lineas: TStringList; Linea: String; I:Integer; ....
__________________
Guía de Estilo de los Foros Cita:
|
#4
|
||||
|
||||
Nada, lo que sucede es que me gusta ahorrar índices y por ello uso uno solo declarado en una variable global.
// Saludos |
#5
|
||||
|
||||
Yo también trabajo de esa manera para situaciones en las que necesito repetidamente ciertas variables, las declaro como globales, aunque hay gente que es contraria a esta idea.
Un Saludo,
__________________
Guía de Estilo de los Foros Cita:
|
#6
|
|||
|
|||
No tiene sentido usar una variable global porque no se ahorra nada.
El hecho de definir una variable local dentro de la funcion no hace que el programa sea mas lento ni que ocupe mas memoria, es más, el uso de variables globales si que puede hacer que el ejecutable sea mas grande. Otros problemas de usar esas variables globales: -Hacen menos entendibles los programas. -Las funciones que las usen no son Thread Safe. -El tamaño del ejecutable y la memoria usada es mayor. -En determinados casos podria ser mas lenta la ejecucion del codigo. En definitiva, no se gana absolutamente nada por usar variables globales, sino que al contrario se pierde. Salud2 !!! |
#7
|
||||
|
||||
Cita:
Simplemente antes de llamar al formulario le paso un valor a esta variable que es de tipo global y esta en unit a parte, y dicha variable me sirve para todos los formularios de toda la aplicación, en mi caso busco la unicidad y la simplicidad, y este es el motivo de trabajar así. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#8
|
||||
|
||||
Cita:
Hace poco vi (no recuerdo dónde, quizá aquí mismo) un truquito que no he puesto en práctica pero me pareció ingenioso: este tipo de variables globales que luego no recordamos bien cuáles son, podemos meterlas dentro de una clase: Código:
unit VarGlobales; interface type TGlobales = class UsuarioId: Integer; Estado: Boolean; Etcetera: Char; end; var Globales: TGlobales; implementation initialization Globales := TGlobales.Create; finalization Globales.Free; end. Globales. en el editor de Delphi, se desplegará la lista de donde seleccionaremos la que necesitemos. Así además, en el código quedará claroque estamos usando una variable global: Globales.Estado // Saludos |
|
|
|