progressbar avance segun demore proceso

[jonydread]

Empezado por escafandra

Ciertamente no está claro lo que quiere.

Usa mi finción XCopy diseñada para copiar de golpe una lista de archivos, pero la modifica para ir de archivo a archivo... perdió el sentido de la función.

Por otro lado, si quiwre controlar el progreso de la copia tiene varias opciones. Un ejemplo lo puede encontrar siguiendo este hilo.


Saludos.

si he visto como realizar progreso de copia pero tambien hago aparte de eso una modificacion y creacion de un archivo por eso queria saber cmo se puede realizar con ambos

Código Delphi [-]
EditArchivo(ruta1.Text);

Código Delphi [-]
procedure TForm1.EditArchivo(rutArchivo: string);
var
   v:integer;
 begin
 try
memo1.Lines.LoadFromFile(ruta1.text+'\sources\$oem$\$$\Setup\Scripts\SetupComplete.cmd');
memo1.Lines.Delete(memo1.Lines.Count -1);
memo1.Lines.Add('Echo..........Install  program');
for v := 0 to ListView2.Items.Count - 1 do
Memo1.Lines.Add(ListView2.Items[v].Caption+ListView2.Items[v].SubItems[0]+' '+ListView2.Items[v].SubItems[1]);
memo1.Lines.Add('Echo..........Completado');
memo1.Lines.Add('Exit');
   finally
   memo1.lines.SaveToFile(rutArchivo);
  end
 end;

adjunto unit
saludos y gracias!