FINDFIRST/NEXT Hilfe

[fuxx]

So, ich habs jetzt in Delphi hinbekommen, ich brauchs aber mehr in Pascal!

 

[Dario Linsky]

Siehe mein letzter Post...

 

[fuxx]

Um ehrlich zu sein: Damit konnt ich nichts anfangen

 

[Dario Linsky]

Setz halt anstelle von TFilename einen String ein und anstelle von THandle ein Cardinal-Typ.
WIN32_FINDDATA ist ein Konstrukt des Windows-API -> MSDN.

 

[fuxx]

FindData: typedef struct _WIN32_FIND_DATA
{
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, *PWIN32_FIND_DATA;

Damit kann man ja nichts anfangen!