Если бы было, то я бы воткнул, но, к сожалению, там больше ничего особенно полезного нет. Автор и сам не знал, что если поставить someBool в false, то функция DwmpSetColorizationParameters начнет сама писать в реестр, и его танцы с бубном вокруг реестра совсем не нужны будут. Я и сам это случайно обнаружил.
А так, на смотри, мне не жалко -- http://winreview.ru/Matchast/765/DWM-iznutri-i-snaruzh, но то, что я сделал в Delphi там нет, и нигде нет, ну, я не нашел ничего похожего, по крайней мере. Да и по самим этим функциям информация крайне скудная, можно сказать, что ее вообще нет.