se vc quizer que ele faça sozinho à desfragmentação use isso abaixo... winexec('c:\windows\system32\defrag c: /f /v',1);
o unico incoveniente é que abre uma janela DOS... Luiz Escobar Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase DOS - Clipper/Assembler xBase SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k LINUX - LAZARUS/Kylix/MySQL; http://www.megasistema.com.br ----- Original Message ----- From: Claudiney Cogo - Listas To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 27, 2007 11:11 AM Subject: Re: [delphi-br] Re: chamando o desfragmentador de disco pela aplicação Experimente o seguinte: winexec ('mmc.exe %systemroot%\system32\dfrg.msc',1); Claudiney Cogo N2 Sistemas e Soluções em Informática Ltda. Av. São Paulo, 172 - 15º Andar - Sala 1505 CEP 87013-908 - Maringá - Pr Tel. 44- 3222-6053 [EMAIL PROTECTED] ----- Original Message ----- From: Gustavo André de Freitas To: delphi-br@yahoogrupos.com.br Sent: Tuesday, March 27, 2007 10:44 AM Subject: [delphi-br] Re: chamando o desfragmentador de disco pela aplicação Pessoal, agradeço a ajuda, consegui, vou postar o código abaixo, para quem precisar também usar. winexec ('mmc.exe c:\windows\system32\dfrg.msc',1); agora minha dúvida é a seguinte: e se o sistema operacional estiver instalado numa partição d: ou e: ou com um nome personalizado, como por exemplo, meunome: ? como faço para driblar essa situação? --- Em delphi-br@yahoogrupos.com.br, Edu Nicácio <[EMAIL PROTECTED]> escreveu > > Você poderia ter procurado nas "Opções de Pasta" do Windows. Lá, além da extensão, você obtem informações do programa associado, parâmetros, como abrir, imprimir, editar, etc cada arquivo no computador. > > Olha o que eu descobri: > > ShellExecute (Application.Handle,'open','Caminho\do\seu\arquivo.msc',nil,nil,SW_SHO WNORMAL); > > Ou então: > > ShellExecute (Application.Handle,'open','mmc.exe','Caminho\do\seu\arquivo.msc',nil, SW_SHOWNORMAL); > > Veja o comando para abrí-los: > > C:\WINNT\system32\mmc.exe "%1" %* > > Ou seja, usando Winexec(...) você não poderá abri-lo diretamente, por não se tratar de um arquivo 'executável'. > > Espero ter ajudado. > > Abraço. > > > ---------------------------------------------------------- ------------ > Atenciosamente: > > > Eduardo Cláudio Nicácio > Analista Programador > Fábrica 02 - CTIS > Tel.: (11) 3150-6834 > [EMAIL PROTECTED] > > > > > ----- Original Message ----- > From: Gustavo André de Freitas > To: delphi-br@yahoogrupos.com.br > Sent: Monday, March 26, 2007 4:45 PM > Subject: [delphi-br] chamando o desfragmentador de disco pela aplicação > > > Pessoal, > > estou tentando chamar o desfragmentador de disco de dentro da aplicação > delphi, mas não estou conseguindo, estou usando o seguinte codigo. > > WinExec ('c:\windows\system32\dfrg.msc', 1); > > não abre de forma alguma, na verdade, nenhum arquivo com extensão .msc > consigo abrir com o comando WinExec, tem algum outro comando...? > > procurei o final de semana todo na net e não encontrei nenhum codigo > neste sentido...aguardo ajuda dos amigos! > > > > > > [As partes desta mensagem que não continham texto foram removidas] > [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]