F�rum Colocar um Backup em sistema com tabelas paradox. #389418

26/10/2010

Oii. pessoal, to fazendo um projeto no col�gio, onde crio um sistema em delphi 4 .. e preciso muito saber como colocar um BACKUP nesse sistema.. sendo que quando o usu�rio desejar, ele realize um backup no sistema e grave em uma m�dia de CD. Como fa�o isso ?? Beijo. Desde j�, agrade�o.

Yuli Chrysostomo

Curtir t�pico

+ 1

Responder

Posts

26/10/2010

Wilson Junior

Oi Yuli, veja se isto lhe resolve http://www.fabricio.pro.br/default.asp?ACT=5&content=43&id=1&mnu=1, ele s� n�o grava em CD, mas procure no Google por gravar em CD automaticamente e aparecer� v�rias formas.

Espero ter colaborado.

Responder

Gostei + 0

27/10/2010

Yuli Chrysostomo

Wilson, eu tinha visto isso anteriormente.. mas o meu problema � que uso o delphi 4, pois como � um trabalho do col�gio.. tenho qe usar a vers�o deles.. pra n�o arriscar de na hora da presenta��o dar pau.. no sistema. Ser� que tem alguma coisa de backup no delphi 4 ?? Voc� sabe ?? desde j� agrade�o. beijo

Responder

Gostei + 0

27/10/2010

F�bio Cruz

Como � Delphi 4 e Paradox, vc n�o consegue fazer uma c�pia e gravar em outro local?

procedure TForm1.Button2Click(Sender: TObject);


var


  SR: TSearchRec;


  I: integer;


  Origem, Destino: string;


begin


  I := FindFirst('c:\Origem\*.*', faAnyFile, SR);


  while I = 0 do begin


  if (SR.Attr and faDirectory) <> faDirectory then begin


  Origem := 'c:\Origem\' + SR.Name;


  Destino := 'c:\Destino\' + SR.Name;


  if not CopyFile(PChar(Origem), PChar(Destino), true) then


  ShowMessage('Erro ao copiar ' + Origem + ' para ' + Destino);


  end;


  I := FindNext(SR);


  end;


end;

Essa procedure copia tudo que vc colocar na pasta para uma outra, basta vc configurar do seu modo.

Responder

Gostei + 0