p> deque DequeFindLeft;// Черга результатів пошуку
deque DequeFindRight;
WIN32_FIND_DATA StructFind;// Структура результатів пошуку
int ColName = 0,// ​​Стовпці таблиці виведення
ColSize = 1,
ColAttrib = 2,
ColCreTime = 5,
ColAccTime = 4,
ColWriTime = 3;
// Безліч атрибутів директорії
set > DirAttribSet;
void CreateDirAttribSet ()// Створення безлічі атрибутів директорії
{
DirAttribSet.insert (16);
DirAttribSet.insert (17);
DirAttribSet.insert (18);
DirAttribSet.insert (19);
DirAttribSet.insert (20);
DirAttribSet.insert (21);
DirAttribSet.insert (22);
DirAttribSet.insert (48);
DirAttribSet.insert (49);
DirAttribSet.insert (50);
DirAttribSet.insert (8208);
}
// --------------------------------------------- ------------------------------
// Створення списку доступних пристроїв
void CreateListOfDevices ()
{
UINT DriveType;
char RootPath [4];
for (char i = 'A'; i <= 'Z'; i + +)
{
strcpy (RootPath, " 0");
RootPath [0] = i;
RootPath [1] = ':';
RootPath [2] = '';
RootPath [3] = ' 0';
DriveType = GetDriveType (RootPath);
switch (DriveType)
{
case DRIVE_REMOVABLE: strcat (RootPath, "3 січня " ");
Form1-> ListDevicesLeft-> Items-> Add (RootPath);
Form1-> ListDevicesRight-> Items-> Add (RootPath);
break;
case DRIVE_FIXED: strcat (RootPath, " Жорсткий диск ");
Form1-> ListDevicesLeft-> Items-> Add (RootPath);
Form1-> ListDevicesRight-> Items-> Add (RootPath);
break;
case DRIVE_REMOTE: strcat (RootPath, " Мережевий диск ");
Form1-> ListDevicesLeft-> Items-> Add (RootPath);
Form1-> ListDevicesRight-> Items-> Add (RootPath);
case DRIVE_CDROM: strcat (RootPath, " CD-ROM ");
Form1-> ListDevicesLeft-> Items-> Add (RootPath);
Form1-> ListDevicesRight-> Items-> Add (RootPath);
break;
case DRIVE_RAMDISK: strcat (RootPath, "RAM-Disk");
Form1-> ListDevicesLeft-> Items-> Add (RootPath);
Form1-> ListDevicesRight-> Items-> Add (RootPath);
break;
}
}
}
// --------------------------------------------- ---------------------------------
// Перетворення із структури результатів пошуку в структуру виводу
void StrucFindToFileProp (WIN32_FIND_DATA StructFind, _FileProperty & FileProperty)
{
// Перетворення імені
strcpy (FileProperty.FileName, StructFind.cFileName);
strcpy (FileProperty.AlterFileName, StructFind.cAlternateFileName);
...