Вниз
Скачать: CL | DM;

FindFirstFile   Найти похожие ветки 

 
Beginer1 ©   (2002-10-07 16:35) [0]

НЕ ДОГОНЯЮ
СУТЬ: ИЩУ ФАИЛ ФУНКЦИЕЙ FindFirstFile ("*.doc" , //указываю что искать
//а тут не догоняю );

ПА-А-А-А-А-А-А-А-А-А-ГИТЕ!!!!!!!!!!!!!!


 
still ©   (2002-10-07 16:44) [1]

The WIN32_FIND_DATA structure describes a file found by the FindFirstFile or FindNextFile function.

typedef struct _WIN32_FIND_DATA { // wfd
DWORD dwFileAttributes;
FILETIME ftCreationTime;
FILETIME ftLastAccessTime;
FILETIME ftLastWriteTime;
DWORD nFileSizeHigh;
DWORD nFileSizeLow;
DWORD dwReserved0;
DWORD dwReserved1;
TCHAR cFileName[ MAX_PATH ];
TCHAR cAlternateFileName[ 14 ];
} WIN32_FIND_DATA;

Т.е. передается указатель на эту структуру.
Выделяешь память, заполняешь, и передаешь указатель.


 
Игорь Шевченко ©   (2002-10-07 16:51) [2]

А эта...ускоритель включить ? F1 называется


 
Beginer1 ©   (2002-10-07 17:57) [3]

Help"Ы цитировать мне не надо :(( , а вот still"у спасибо заноследнии две сточки (вот это я и не догонял), а может ещё подскажете мне какие-нибудь функции для поиска файлов , используя только uses Windows или вобще без него.


 
Leon_O ©   (2002-10-07 18:07) [4]

Попробуй по другому.
Вырезка с одной моей проги:



...................................................

var
FileAttrs: Integer;
SR: TSearchRec;
LogFileNames: TStringList;

....................................................

LogFileNames := TStringList.Create;
FileAttrs := faAnyFile;

.....................................................

if FindFirst("\*.csv", FileAttrs, SR) = 0 then
begin
LogFileNames.Add("\"+SR.Name);

while (FindNext(SR) = 0) do
begin
LogFileNames.Add("\"+SR.Name);

end;
end;
FindClose(SR);

........................................................

В LogFileNames будут записаны имена всех найденых файлов.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
14-59330
RV
2002-10-31 17:29
2002.11.18
Мобилы. SMS с них, на мыло. КАК?!? Если возможно.


1-59193
Мазут Береговой
2002-11-06 07:14
2002.11.18
как правильно открывать MS WORD в приложении Delphi, что бы он по


4-59503
AlexHEY
2002-10-09 03:22
2002.11.18
Пустая форма на WinApi?


14-59363
int64
2002-10-28 11:28
2002.11.18
Преферансная загадка.


8-59290
vlsoft
2002-07-26 21:11
2002.11.18
Нужны художники




   Наверх