Slette mere end en fil/mappe/regnøgle

Hvad har du prøvet? Hvis du kan slette en hvorfor kan du så ikke slette 2 eller flere?

Jeg har prøvet at slette 2.. og det kan jeg også men så kommer jeg til at gentage en kode igen og igen. jeg har også prøvet:

klik på knap
Begynder
slet fil
slet fil
vis sand besked
vis falsk besked

Men det kan jeg ikke få til at fungere

Hvis vi f.eks. snakker filer hvordan har du så filnavnene der skal slettes, i en stringlist eller er det bare en hel mappe der skal slettes? Hvad med regnøgler, har du en liste med dem eller hvad?

procedure TForm1.Button1Click(Sender: TObject);
begin
if DeleteFile('C:\Documents and Settings\User\Skrivebord\semig.txt')
('C:\Documents and Settings\User\Skrivebord\semig2.txt') then
showmessage('Folders/Files is Deleted!')
else
showmessage('Folders/Files could not be Deleted');

jeg bruger den, uden held.. til reg filer ved jeg ikke rigtig hvad jeg skal..

Du kan lave en procedure:
(utestet)

procedure SletFiler(Filer : array of string);
var
    i : integer;
begin
    for i:=0 to Length(Filer)-1 do
        if not DeleteFile(Filer[i]) then
            showmessage('File '+Filer[i] +'could not be deleted!');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
    SletFiler((.'Fil1.txt','Fil2.dat','Fil3.jpg'.));
end;

Her er en løsning mht. at slette en hel mappe med filer, har dog ikke testet det.

http://delphi.about.com/cs/adptips1999/a/bltip1199_2.htm

tjekker den og kommer med svar ;)

Den med filerne virker men der kommer ikke en besked op..

Hvilken besked og hvor?

der kommer ikke en besked om at de er slettet..

ok, men hvorfor sætter du så ikke bare en ShowMessage ind?

Ups sorry Det har jeg gjort :)

læg du et svar med hensyn til hjælp med slette filerne :)

Jeg har svaret på sletning af filer og mapper, men hvad med regnøgler, har du fundet ud af det?

det vender jeg tilbage til senere hvis det er iorden med dig? vil gerne eksperimentere videre med filer og mapper først ;)

Hvis jeg nu vil slette alle filerne i en mappe.. Jeg har set på linket men den sletter hele mappen jeg vil gerne slette ALLE filerne i en mappe hvad gør jeg så?

Jeg har prøvet med *.* uden held..

Prøv med en FOF_FILESONLY i fFlags og brug så en *.*, det står også beskrevet i win32 hjælpen.