![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
![]() Buenas!!!
No se si habre puesto bien esta pregunta en este foro, pero bueno, ahi va: Necesito ejecutar una orden copy de MS DOS desde mi aplicacion (requisitos del jefe ![]() La razon de ejecutar el copy de msdos es xq dice el jefe que despues de ejecutar un porceso que genera 3 ficheros de texto, tengo que concatenar los 3 en uno, y él dice que use un "copy fich1.txt+fich2.txt+fich3.txt fichResul.txt" para concatenarlos. Si se os ocurre alguna otra forma sencilla de concatenar los tres ficheros, no dudeis en comunicarmelo. Muchas gracias a todos de antemano. Raul.
__________________
ash nazg durbatulûk ash nazg gimbatul ash nazg thrakatulûk agh burzum-ishi krimpatul |
#2
|
||||
|
||||
Hola RaulChemical!
Mira este hilo : http://www.clubdelphi.com/foros/show...&threadid=2832 Espero que te sirva. Saludos! ![]() |
#3
|
||||
|
||||
mira yo no se si te sirva pero yo lo que haria es declarar 3 stringlist algo asi
Código:
procedure concatenararchivos; var Arch1, Arch2, Arch3: TStringList; nidx: Integer; begin //Abre los archivos Arch1 := TStringList.Create; Arch2 := TStringList.Create; Arch3 := TStringList.Create; //Carga los valores Arch1.LoadFromFile('c:\arch1.txt'); Arch2.LoadFromFile('c:\arch2.txt'); Arch3.LoadFromFile('c:\arch3.txt'); //Concatena for nidx := 0 to arch2.count - 1 do Arch1.Add(Arch2.Strings[nidx]); for nidx := 0 to arch3.count - 1 do Arch1.Add(Arch3.Strings[nidx]); //Guarda el archivo concatenado Arch1.SavetoFile('c:\Resulta.txt'); end; pruebalo que si funciona y suerte
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
#4
|
|||
|
|||
![]() Molan mucho las dos opciones que me habeis dado hasta ahora, pero de momento me quedo con la de nuria. La tuya, eduarcol, es muy buena y me has dado una idea para otra movida rara que se ha inventado mi jefe
![]() Bueno, a seguir currando.
__________________
ash nazg durbatulûk ash nazg gimbatul ash nazg thrakatulûk agh burzum-ishi krimpatul |
#5
|
||||
|
||||
oye pero tu jefe es super imaginativo o le gusta verte sufrir
![]()
__________________
...Yo naci en esta ribera del arauca vibr@d0r Soy hermano de la espuma, de la garza, de la rosa y del sol... Viva Venezuela |
![]() |
|
|
![]() |
|