Никто не подскажет, в чем косяк? |
Cообщение скрыто для удобства комментирования.
Прочитать сообщение
Комментировать | « Пред. запись — К дневнику — След. запись » | Страницы: [1] [Новые] |
Найк:Тогда в строке "LoadF.LoadFromFile ('c:\birds\data' +edit4.Text+ '.txt');" ошибкаLightpower, допустима маска
code:
AnsiString FilesByMask(AnsiString Mask)
// return список полных имен файлов, соотв-щих данной маске, с разделителем '\r\n'
{
WIN32_FIND_DATA fInfo;
AnsiString RetVal = "",
dir = ExtractFilePath(Mask);
HANDLE fCpy = FindFirstFile(Mask.c_str(), &fInfo);
do {
RetVal = RetVal + dir + fInfo.cFileName + "\r\n";
} while(FindNextFile(fCpy, &fInfo));
return RetVal;
}
Комментировать | « Пред. запись — К дневнику — След. запись » | Страницы: [1] [Новые] |