Этот кадр в основном просто растровое изображение. Кажется, в Windows API нет никакой функции, чтобы нарисовать это. Вместо этого предыдущий спрашивающий здесь в SO обнаружил, что это (или, по крайней мере, очень похожее) растровое изображение сохраняется как растровое растровое изображение в explorer.exe, если я правильно помню.
Следовательно, написать компонент Delphi, отображающий растровое изображение внутри такого фрейма, было бы тривиально - нужно просто скопировать это растровое изображение. Тем не менее, я чувствую, что это было бы неправильно (copyvio или, по крайней мере, плохие манеры). Но, конечно, вы можете нарисовать свою собственную версию кадра / используя GIMP или Photoshop / и включить ее в качестве растрового изображения.
Также обратите внимание, что очень легко применять растровые эффекты, такие как сдвиг оттенков, к растровому изображению во время выполнения.