Może ktoś z was wie w jaki sposób za pomocą Delphi moge przeszukac dysk w poszukiwaniu określonego pliku? To byłoby mi bardzo pomocne. plik powiedzmy nazywa sie "winamp.exe" a po odnlalezieniu mógłbym go uruchomic za pomoca ShellExecute()?
0
0
Poczytaj o FindFirst i FindNext
Trochę na ten temat jest na: http://vcl.4programmers.net
//PS> trzeba by zrobić listę najczęściej zadawanych pytań - to by miało jedno z pierwszych miejsc
<font color="blue">[</span><font color="red">ADD</span><font color="blue">]</span>
http://vcl.4programmers.net/viewapi.html?id=87
0
podany przez Ciebie url po wpisaniu w jego polu wyszukiwania wyświetla stronę błedu 404.htm :( może mógłbyś mnie przekierować do FindFirst i FindNext bezpośrednio za pomocą linku?
z góry dzięki
pozdrawiam
0
Jeśli chcesz przeszukać cały dysk wraz z podfolderami, to nie obejdzie się bez rekurencji. Na 4p jest gdzieś przykład (nie pamiętam gdzie :/ )jak kasować katalog wraz z podkatalogami. Możesz go w łatwy sposób przrerobić, tylko zamiast kasowania sprawdzasz czy jest to szukany przez ciebie plik...
0
Ksiażka Adama Boducha: Delphi.Kompendium Programisty, strona 168. Książka tania. polecam kupić
0
BYŁO!!!!!! Kiedy się wreszcie nauczycie korzystać z wyszukiwarki???
http://4programmers.net/Forum/viewtopic.html?id=45937
http://4programmers.net/Forum/viewtopic.html?id=45999
http://4programmers.net/Forum/viewtopic.html?id=44160
... więcej nie chce mi się wklejać - jest tego PEŁNO :-[ :-[ :-[
0
Jeżeli nadal niewiesz, to wykorzystaj umiejentości programowania procedur rekurencyjnych. Jeżeli i tak nie rozumiesz to daj odpowiedź (ale spróbuj sam), a jutro (daj odpowiedź jeśli niwiesz) zamieszcze algorytm przeszukiwania stroktur katalogu.
0
głównie do: Łukasz Frontczyk
dopiero zaczynam prace z Delphi wiec sobie na razie nie radzę a jeśli chodzi o ksiązke to niestety nie mam pieniędzy, zbieram na te nową delphi 7; 80zł chyba wiec to troche potrwa, póki co ide czytać tematy spod linków podanych przez ciebie powyżej, a jeśli chodzi o wyszukiwarke to nie mam cierpliwości szukałem w wyszukiwarce podpowiedzi do innego tematu i wyświetliły mi sie "jakieś" z tym ze mogłem strony przełączać od 1 do 16 no to chyba lekkie przegięcie no nie? bo cały wieczór musiałbym poświęcić na poszukiwanie tego co mi potrzebne a ostatnio szukałem też odpowiedzi w wyszukiwarce na 4programmers.net, poświeciłem ok pół godziny a i tak nie było tego co mnie interesowało, wiec wole napisac od nowa i wyjaśnić dany problem z mojego punktu widzenia
pozdrawiam Mariusz...
0
nadal nie roumiem, byłbym wdzięczny za algorytm wyszukujący konkretny plik np: "winamp.exe" a potrzebne to jest do pracy dyplomowej, mam napisac program do obsługi programów
pozdrawiam Mariusz
0
//PS> trzeba by zrobić listę najczęściej zadawanych pytań - to by miało jedno z pierwszych miejsc
Już jest... www.4programmers.net/faq jeśli się nie mylę...
A co do tematu, to: włączasz delphi, wpisujesz gddziekolwiek w kodzie FindFirst i naciskasz F1... Jeśli nie znasz anglika, to zajrzyj do Encyklopedii albo do jakiejkolwiek książki do Delphi. Bez takich rzeczy nie masz co się zabierać za programowanie... Ja bez książek bym się nie obszedł przez te 10 lat, które programowałem bez NET'u...
0
Przykładowy program przeszukujący cały dysk i wyświetlający znaleziony plik wraz ze ścieżką:
[code]
program Szukaj;
uses windows;
{$APPTYPE CONSOLE}
procedure usunk(path:string);
var FD:TWin32FindData;
H:THandle;
begin
H:=FindFirstFile(PCHAR(Path+'.'),FD);
If H=INVALID_HANDLE_VALUE then exit;
Repeat
If (FD.dwFileAttributes and FILE_ATTRIBUTE_DIRECTORY<>0) and (FD.cFileName[0]<>'.') then
usunk(path+FD.cFileName+'');
If FD.dwFileAttributes and FILE_ATTRIBUTE_DIRECTORY=0 then begin
writeln(path,FD.cFileName);
end;
Until not FindNextFile(H,FD);
FindClose(H);
end;
begin
usunk('C:');
end.
[/code]