ABADev blog

Blog

  • GUIDs

    Чего-то подумалось сегодня с утра – монополию Microsoft погубит повальное использование во всех дырках псевдо-уникальных GUID’ов.
    Как только кто-то сломает алгоритм генерации или просто их количество начнет зашкаливать, они начнут повторяться у разных разработчиков на компьютерах, это обрушит устоявшуюся технологию и погребет нафиг и Windows, и офис, и кучу third-party разработанного софта. Ведь сейчас практически все зиждется на уникальности генерации GUID…

  • MS Windows STOP error codes

    Very useful resource with short description for most STOP errors (during Windows boot) and links for extended information about error:
    http://aumha.org/a/stop.htm

  • Spreadsheet Convert

    Added the export from Open Office spreadsheets (.ods-files).
    New build uploaded to site for downloading

  • Picture Convert

    Released today. Just added all information on html-pages and uploaded to site

    In trial a few files (10) from directory processed only and “unregistered” text placed in center of any saved image
    The registered version will work without any limitations, of course

  • Microsoft Desktops v1.0

    Русинович выпустил утилиту для виртуальных десктопов:

    http://technet.microsoft.com/en-us/sysinternals/cc817881.aspx

  • PriceWaterhouseCooper

    Очередная покупка тулзы от их сотрудника.

    С одной стороны хорошо, что один сотрудник рекомендует тулзу своему соседу, т.е. он доволен покупкой и функционала ему хватает.
    С другой стороны, раз тулза нужна многим (и не только в одном филиале), то почему бы компании не купить пакет лицензий и раздать своим сотрудникам? И им удобней, и мне приятней.

    PS: кстати такая же ситуация с Ernst&Young – тоже разные сотрудники из разных филиалов (что удивляет даже из Литвы и Чехии)  берут себе лицензии, а компания не выбивает скидки за опт.

  • save IStorage into stream

    In last days I worked with IStorage interface. For my task I needed the function to save the IStorage into file and/or stream and later to load from file/stream into IStorage.

    I wrote the next useful functions:

      procedure CreateOLEDoc(const AFileName: WideString; AStorage: IStorage);
      var
        hr: Integer;
        NewStorage: IStorage;
      begin
        hr := StgCreateDocfile(PWideChar(AFileName), STGM_DIRECT or STGM_READWRITE or STGM_CREATE or
                               STGM_SHARE_EXCLUSIVE, 0, NewStorage);
        if (hr = S_OK) then
        begin
          AStorage.CopyTo(0, nil, nil, NewStorage);
          NewStorage.Commit(STGC_DEFAULT);
          NewStorage := nil
        end
      end;

      procedure WriteStorageToStream(AStorage: IStorage; AStream: TStream);
      var
        NewStorage: IStorage;

        LockBytes: ILockBytes;
        HGlob: HGLOBAL;
        intfStream, myStream: IStream;
        oldStatstg: TStatStg;
        cbRead, cbWritten: Comp;
      begin
        HGlob := GlobalAlloc(GMEM_MOVEABLE, 0);
        try
          OleCheck(CreateILockBytesOnHGlobal(HGlob, False, LockBytes));
          OleCheck(StgCreateDocfileOnILockBytes(LockBytes, STGM_DIRECT or STGM_READWRITE or STGM_CREATE or
                               STGM_SHARE_EXCLUSIVE, 0, NewStorage));
          OleCheck(AStorage.CopyTo(0, nil, nil, NewStorage));
          NewStorage.Commit(STGC_DEFAULT);
          OleCheck(CreateStreamOnHGlobal(HGlob, True, intfStream));

          myStream  := TStreamAdapter.Create(AStream);
          try
            OleCheck(intfStream.Stat(oldStatstg, 1));
            OleCheck(intfStream.Seek(0, 0, cbWritten));

            OleCheck(intfStream.CopyTo(myStream, oldStatstg.cbSize, cbRead, cbWritten));
          finally
            myStream  := nil;
            intfStream := nil;
          end;
        finally
          NewStorage := nil;
          GlobalFree(HGlob);
        end;

        AStream.Position := 0;
      end;

  • иудаизм запрещает любые татуировки на теле

  • базовые эмоции человека

    Есть разные классификации базовых эмоций:

    Автор Фундаментальные эмоции Основания для отбора
    М. Арнольд гнев, отвращение, мужество, удрученность, желание, отчаяние, страх, ненависть, надежда, любовь, печаль отношение к тенденциям действия
    П. Экман гнев, отвращение, страх, радость, печаль, удивление универсальные способы мимического выражения
    Н. Фрижда желание, радость, гордость, удивление, страдание, гнев, отвращение, презрение, страх, стыд формы готовности к действию
    Дж. Грей ярость/ужас, беспокойство, радость врожденность
    К. Изард гнев, презрение, отвращение, страдание, страх, вина, интерес, радость, стыд, удивление врожденность
    В. Джеймс страх, горе, любовь, ярость физическое ощущение
    В. МакДугалл гнев, отвращение, приподнятое настроение, страх, подавленность, эмоция нежности, изумление отношение к инстинктам
    О. Морер боль, удовольствие неусваиваемые эмоциональные состояния
    К. Отли, П. Джонсон-Лэрд гнев, отвращение, страх, счастье, печаль не требуют пропозиционального содержания
    Дж. Панксепп ожидание, страх, ярость, паника врожденность
    Р. Плучик одобрение, гнев, предвкушение, отвращение, радость, страх, печаль, удивление отношение к адаптивным биологическим процессам
    С. Томкинс гнев, интерес, презрение, отвращение, страх, радость, стыд, удивление плотность нейронной активности
    Дж. Уатсон страх, любовь, ярость врожденность
    Б. Уэйнер счастье, печаль атрибутивно-независимое

    Китайский философ Хань Юй (768-824) в своем трактате “Юань син” (“Обращение к началу [человеческой] природы”) выделяет три категории человеческой природы: высшая категория (шан пинь), которой присуще только добро, средняя (чжун пинь) – и добро и зло, низшая (ся пинь) – только зло.

    Там же дан набор шести эмоций:

    • “любовь” (хао)

    • “ненависть” (у)

    • “умиротворенность” (си)

    • “гнев” (ну)

    • “скорбь” (ай)

    • “радость” (лэ)

    В отрывке из “Ли цзи” говорится только о четырех эмоциях:

    • “добродушие” (си)

    • “гнев” (ну)

    • “печаль” (ай)

    • “радость” (лэ)

    Кроме того, у китайцев были также пятеричные и семеричные наборы. Например, в “Ли цзи” есть следующий семеричный набор:

    • “радость” (си)

    • “гнев” (ну)

    • “скорбь” (ай)

    • “страх” (цзюй)

    • “любовь” (ай)

    • “отвращение” (у)

    • “вожделение” (юй)

    Эмоции также имеют корреляции со стихиями.

    Стихии “Нэй цзин”
    дерево ну (“гнев”)
    огонь си (“веселье”)
    почва сы (“желание”)
    металл ю (“печаль”)
    вода кун (“страх”)

  • drag file from Explorer and view/open on drop

    Today I decided to implement the new feature for all our viewers – to open the file which dropped from Windows Explorer
    When I opened the sources to implement this feature, I found that this feature is already implemented:-)

    Just forgot to include in history.