Использовать копию из окон, отображающих форму статуса

Question

с delphi, что я могу отобразить форму, которая отображается при запуске копирования?Большое спасибо.

Answer 1

Вы должны использовать функцию SHFileOperation.

procedure TForm1.Button1Click(Sender: TObject);
var
  shfileop: TSHFileOpStruct;
begin
  shfileop.Wnd := Handle;
  shfileop.wFunc := FO_COPY;
  shfileop.pFrom := PChar('C:\myfile.txt'#0);
  shfileop.pTo := PChar('C:\Copy of myfile.txt'#0);
  shfileop.fFlags := 0;
  SHFileOperation(shfileop);
end;