WinApi функция GetBinaryType
Описание:
function GetBinaryType(lpApplicationName: PChar; var lpBinaryType: DWORD): BOOL;
Функция определяет тип файла - праграмма ли это, и если так, то какой тип исполняемого файла. Это опредеяет какой подсистеме запускать файл.
Внимание: функция не поддерживается в Win 95/98/Me. Используйте SHGetFileInfo.
Параметры:
lpApplicationName: Строка которая должна содержать полный путь к файлу, чей тип должен быть определен.
В ANSI-версии этой функции, имя файла ограниченно MAX_PATH. Для того чтобы увеличить предел до 32,767 символов Unicode, вызовите расширенную(Unicode) версию функции и добавте "\?\" в начало пути.
lpBinaryType: Переменная которая получае информацию о типе выполняемого файла указанного в lpApplicationName. Определены следующие константы:
SCS_32BIT_BINARY - 32битное приложение Windows
SCS_64BIT_BINARY - Windows XP: 64битное приложение Windows
SCS_DOS_BINARY - 16битное приложение МС-DOS
SCS_OS216_BINARY - 16битное приложение OS/2
SCS_PIF_BINARY - файл PIF который выполняет МС-DOS
SCS_POSIX_BINARY - POSIX-приложение {Прим.пер.: Такие приложения используются в системах Unix\Linux}
SCS_WOW_BINARY - 16битное приложение Windows
Возвращаемые значения
Если файл- программа, то возвращаемое значение не ноль. Функция возвращает тип приложения в переменную lpBinaryType.
Если файл- не программа или функция терпит неудачу, то возвращаемое значение ноль.
Чтобы получить расширенную информацию об ошибке, вызовите функцию GetLastError.
Замечания
В качестве альтернативы вы можете получить ту же информцию вызвав функцию SHGetFileInfo и передав флаг SHGFI_EXETYPE в параметре uFlags.
P.S. Как всегда это бывает, в России зима подкралась неожиданно. У нас в Сибири вот уже 3ие сутки сплошной стеной идет снег, который толи не успевают толи не хотят успевать чистить. Как следствие увеличивается количество мелких и крупных ДТП, бесспорно вы останетесь довольны вызовом эвакуаторов когда без него из сложившийся дорожной ситуации ни как не выбраться, будьте аккуратны на дороге !
Материал взят из:
Русская спpавка по Windows API