[NumLock]

в простейшем случае просто изменить расширение .exe на .scr
белее тяжелый, но не полноценный тут http://www.delphisources.ru/pages/fa..._creating.html (там не хватает preview, которое в Свойства-Экран-Заставка)