Aguadar a execução da copia

26/11/2005

Estou terminando minha aplicação que atualiza um arquivo em determinadas pastas diferentes. O pessoal do desenvolvimento joga uma executavel em uma pasta e este tem que ser copiado para 5 pastas diferentes, a aplicação mostra o progresso da copia utilizando o artigo do Nildo e funciona corretamente, porem eu gostaria que ela só copiasse para a pasta seguinte quando ela concluisse a anterior, como fazer isso?


Fernando Lempê

Respostas

26/11/2005

Fernando Lempê

Acho que me expressei mal, na verdade tenho uma função que copia arquivos, como fazer para que ela só copie novamente após concluir a copia do anterior?


Responder Citar

26/11/2005

Fernando Lempê

procedure TForm1.Button2Click(Sender: TObject);
begin
  if m1=true then
     begin
       atl(p2);
    end;

  if m2=true then
    begin
      atl(p3);
    end;

  if m3=true then
    begin
      atl(p4);
    end;

  if m4=true then
    begin
      atl(p5);
    end;

  if m5=true then
    begin
      atl(p6);
    end;

  if m6=true then
    begin
      atl(p7);
    end;

end;


O atl(px) é quem faz a copia, como fazer para que o atl(p3) só seja executado quando o atl(p2) terminar?


Responder Citar