1 [DELPHI] Criando um programa para formatar disket Sex Fev 15, 2013 8:48 am
Moedas : 278
Mensagens : 1177
Idade : 27
Humor : Forever Alone T.T
Reputação : 28
Mensagens : 1177
Idade : 27
Humor : Forever Alone T.T
Reputação : 28
RodrigoNunes
Eai galera, acabei de criar esse programa, é muito simples.
1° você cria um .bat com o código abaixo e salve em c:\ com o nome: Formatar.bat
2° Agora no delphi coloque em sua Tform um botão. Depois disso dê um clique duplo nele e adicione o código abaixo:
Agora pressione F9 e teste a aplicação, qualquer dúvida pergunte aqui ^^
1° você cria um .bat com o código abaixo e salve em c:\ com o nome: Formatar.bat
- Código:
cls
cd
format a: /q/y
break(10)
exit
2° Agora no delphi coloque em sua Tform um botão. Depois disso dê um clique duplo nele e adicione o código abaixo:
- Código:
if messagedlg('Insira um diskette para iniciar formatação!', MTINFORMATION, [MBOK, MBCANCEL] , 0) = MROK then begin
winexec('C:formatar.bat', SW_HIDE);
end;
finally
messagedlg('Formatação Concluída!', MTINFORMATION , [MBOK] , 0);
end;
Agora pressione F9 e teste a aplicação, qualquer dúvida pergunte aqui ^^