Сохранение маски в открытом бинарном файле
function WriteToBinaryFileHandle(FileHandle: integer): integer;
FileHandle