Клубове Дир.бг
powered by diri.bg
търси в Клубове diri.bg Разширено търсене

Вход
Име
Парола

Клубове
Dir.bg
Взаимопомощ
Горещи теми
Компютри и Интернет
Контакти
Култура и изкуство
Мнения
Наука
Политика, Свят
Спорт
Техника
Градове
Религия и мистика
Фен клубове
Хоби, Развлечения
Общества
Я, архивите са живи
Клубове Дирене Регистрация Кой е тук Въпроси Списък Купувам / Продавам 02:25 25.09.24 
Компютри и Интернет
   >> Delphi
Всички теми Следваща тема *Кратък преглед

Тема FindFirst - kyde byrkam ?  
АвторSa (Нерегистриран)
Публикувано16.05.02 13:17



LocalPath :...
FileAttrs := faAnyFile;
if FindFirst(LocalPath + '\*.*', FileAttrs, sr) = 0 then

begin
repeat
if (sr.Attr and FileAttrs) = sr.Attr then // bi tryabvalo tova vinagi da e TRUE, no ne vinagi e.. zashto ? Kyde byrkam ?
Mersi predvaritelno...



Тема Re: FindFirst - kyde byrkam ?нови [re: Sa]  
Автор Mandor (8-)
Публикувано16.05.02 16:56



Почти дословно си повторил примера в Help-а на Delphi5...

Предположение:
Аргумента за атрибут е малко двузначен; ако зададеш два флага, това какво означава - че искаш файловете, които имат и двата флага или тези, които имат който и да е от тези флагове?
В случая Delphi-то (т.е. Windows-а) работи по втората схема; така получаваш файлове с установен който и да е от исканите атрибути, а ако искаш само тези, които имат установени и двата, ги филтрираш по посочения от теб начин.



Тема Знам ли?нови [re: Sa]  
Автор Pechenia (нема лабаво ;-)
Публикувано16.05.02 18:39



Нещо не схванах... Преписах същия пример за FindFirst със един ListBox L и един бутон B. При натискане на бутона файловете и директориите от 'C:\*.*' се нахакват в L - независимо с какви атрибути са.
procedure TForm1.Button1Click(Sender: TObject);
var sr: TSearchRec;
FileAttrs: Integer;
begin
FileAttrs := faAnyFile;
if FindFirst('c:\*.*', FileAttrs, sr) = 0 then
begin
if (sr.Attr and FileAttrs) = sr.Attr then L.Items.Add (sr.Name);
while FindNext(sr) = 0 do if (sr.Attr and FileAttrs) = sr.Attr then L.Items.Add (sr.Name);
FindClose(sr);
end;
end;
При тебе какви файлове не се прочитат?

чети и дишай по-леко


Тема Re: Знам ли?нови [re: Pechenia]  
АвторSa (Нерегистриран)
Публикувано17.05.02 09:18



Obhogdam vsichki failove na c:\ (vkluchitelno i poddirektoriite) i sumata na razmera na failovete se razlichavashe ot tazi, koyato pokazva win-a (vseki pyt pokazva edno i systo chislo), kogato ya izpylnih postypkovo ne vyrhu celiya diska, a vyrhu direktoria na adobe (kydeto pak imashe razminavane, nyakoi direktorii obache si byaha nared) propuskashe faila WHAppList.xml ot direktoria C:\Documents and Settings\Administrator\Application Data\Adobe\Acrobat\Whapi.... Kato mahnah proverkata i vsichko si stana nared.... (ne sym tyrsil koi drugi failove propuska) strannoto e, che kogato tyrsya za fail, ko tyrsya kato anyfail i posle pri proverkata bi tryabvalo vinagi da e true...




Всички темиСледваща тема*Кратък преглед
Клуб :  


Clubs.dir.bg е форум за дискусии. Dir.bg не носи отговорност за съдържанието и достоверността на публикуваните в дискусиите материали.

Никаква част от съдържанието на тази страница не може да бъде репродуцирана, записвана или предавана под каквато и да е форма или по какъвто и да е повод без писменото съгласие на Dir.bg
За Забележки, коментари и предложения ползвайте формата за Обратна връзка | Мобилна версия | Потребителско споразумение
© 2006-2024 Dir.bg Всички права запазени.