Dúvida deletefile

[~GabrielD 6]

Bom, andei vendo sobre deletefile

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Minha dúvida é, eu por exemplo tenho os arquivos a ser apagado em C:\ porém outra pessoa em D:\, como seria a possível a pessoa utilizar o programa ? No caso um cleaner... //Comofas '-'

 

E vator, sei que tu ama os noobs da info zone :amor: aeuea

[DragonBoss 9]

haha, Vator já fez sua fama no fórum =D

Ele é uma boa pessoa, um pouco impaciente talvez, mas ótimo programador e amigo.

 

Enfim... Tem um código do site tecnobyte, que certamente lhe será util ( abaixo o código e citações exatamente como está no site):

 

Obter a letra do drive onde está o Windows

 

Inclua na seção uses: Windows

Problema:

 

Como saber em qual unidade de disco (drive) o Windows está

instalado?

 

Solução:

 

Esta função retorna a letra do drive onde está instalado o

Windows:

 

function GetWindowsDrive: Char;

var

S: string;

begin

SetLength(S, MAX_PATH);

if GetWindowsDirectory(PChar(S), MAX_PATH) > 0 then

Result := string(S)[1]

else

Result := #0;

end;

 

{ Exemplo de uso: }

 

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Caption := GetWindowsDrive;

end;

 

Já que você pode descobrir aonde está o windows... acredito que não preciso dizer mais nada né ? Uma concatenação simples é mais que o suficiente =D

 

 

Observação:

 

DELETEFILE não funciona com coringas ( *.* )...

 

Ao invés disso você pode usar isso:

 

var

s : string;

begin

s := 'cmd /c del ' + Edit1.Text + '\*.txt';

WinExec(pchar(s),0);

 

end;

 

Por favor, tende entender como funciona, simplesmente dei o código pronto.

 

flw, abraços

[Mestre_Vator 0]

E vator, sei que tu ama os noobs da info zone aeuea

 

Eu amo inis :3 (inis <> noobs).

 

DeleteFile não funciona com coringas,como o DragonBoss falou.

Você pode criar um array com todos os arquivos do diretório e usar o DeleteFile em cada arquivo :D

Mas seria melhor pelo searchRect.

E também o WinExec é bom evitar usar.

 

E cuidado com o que faz,não vá deletar qualquer coisa na pasta,saiba BEM sobre o windows que você usa,e seus arquivos temporários e etc..

 

Flw ae,vlw dragon.

A propósito,estou adorando enquanto o Owner' não entra :D

[~GabrielD 6]

Aeuuea beleza ai, valeu aos dois, e no caso, seria mais para arquivos básico mesmo, logs e tals... Mais vou tentar ler melhor quando eu voltar da aula ;D Se tiver alguma outra sugestão pode postar também ^^

[Owner 8]

Duvida respondida, se o autor do tópico quiser mais uma ajuda, me comunique para re-abrir o tópico ou crie outro (: :yes:

Fechado