copyfileunit.pas

教学管理系统源代码

unit copyfileUnit;

interface

uses
  SysUtils, Windows, Messages, Classes, Graphics, Controls,
  StdCtrls, ExtCtrls, Forms, ComCtrls;

type
  TcopyfileForm = class(TForm)
    Animate1: TAnimate;
    Label1: TLabel;
  end;

var
  copyfileForm: TcopyfileForm;

implementation

{$R *.DFM}

end.