[DELPHI] Szukanie plikow
Moderators: Frost, Luigi, HQTM-Team
[DELPHI] Szukanie plikow
jak wyszukac w katalogu np. wszytskie pliki .exe ale tylko te ktore maja abc w nazwie?
Last edited by zad on 2006-05-01, 16:00, edited 2 times in total.
[XPAND.XT.PL]
Wpisz w wyszukiwarce abc*.exe albo *abc*.exe (zależy czym szukasz). Możesz także wyszukać wszystkie, które mają abc a później przefiltrować wynik (np wyświetlić po rozszerzeniach). Sposobów jest kilka
... You only have to know how to prepare query, google will do the rest ...
... My software ...
... Guide to Punctuation ...
... My software ...
... Guide to Punctuation ...
Code: Select all
s:=edit1.text; // dir
deletefile(s+'\abc*.exe);
[XPAND.XT.PL]
DeleteFile nie obsługuje symboli wieloznaczych (czy jak to się nazywa, chodzi o *). Jeśli chcesz skasować wszystkie pliki abc*.exe, to zrób to tak:
Powinno zadziałać.
Code: Select all
procedure DeleteAll(strDirectory,strMask:string);
var F:TSearchRec;
nResult:integer;
begin
nResult:=FindFirst(strDirectory+'\'+strMask,faReadOnly+faArchive,F);
while (nResult=0) do
begin
DeleteFile(strDirectory+'\'+F.Name);
nResult:=FindNext(F);
end;
FindClose(F);
end;
... You only have to know how to prepare query, google will do the rest ...
... My software ...
... Guide to Punctuation ...
... My software ...
... Guide to Punctuation ...