uzycie FindFirst

<font color="blue">Mam funcke FindFirst('plik.txt',cos,cos);</span>

Co mam wpisac w te miejsca co jest napis cos by dzialalo??

var SearchRec: TSearchRec;
{...}
FindFirst('plik.txt', faAnyFile, SearchRec)

Uruchomienie delphi - 10 sek.
Znalezienie - 5 sek.
W czym problem?
[dopisane]
Napisanie tego postu - 1 min ...

Ewentualnie zamiast faAnyFile możesz wlnąć coś innego, jak chcesz znaleźć plik o konkretnych atrybutach...

a skad to np wiedziales??

[dopisane]
i co tu mam zle

procedure TForm1.Button1Click(Sender: TObject);
var
Ser:TSearchRec;
begin
Ser:=TSearchRec;
FindFirst('plik.txt', faAnyFile, SearchRec);
end;

end.

???

I jak zrobic by po znalezieniu tych plikow wyswietlilo sciezki dostepu wszstkich plikow w Memo??

<quote>i co tu mam zle

procedure TForm1.Button1Click(Sender: TObject);
var
Ser:TSearchRec;
begin
Ser:=TSearchRec; // !!

Jak zrobic cos takiego ze jesli znajdzie pare lub jeden plikow o nazwie plik.txt to doda ich sciezki dostepu do memo np c:plikiplik.txt???

1. Przeczytaj helpa.
2. Pomyśl
3. Pomyśl jeszcze raz
   ...
   n. j/w
   ...
   n^n. j/w
   n^n+1. Jeśli nadal nic nie wymyśliłeś, daj se spokój z programowaniem i się tu więcej nie pokazuj, po prostu się nie nadajesz.... Lepiej zostań śmieciarzem lub robotnikiem budowlanym...

ech, findfirst, findnext, findclose... ofcoz f1 i cała filozofia.

TSearchRec jest rekordem, więc nie musisz go tworzyć przez create, czy jakieś przypisania. możesz bezpośrednio sie odwoływać do niego (przez zmienną ofcoz)

no i ofcoz programowanie jest trudne i należy rozumiec znaczenie słowa example i mumieć kliknąć nań

Odrobina autoreklamy:

wejdz na http://kusmierek.republika.pl sciagnij zrodla programu Updater i poanalizuj.