Лови, написано на D7. 
FastMM4 - если у тебя нет просто закоментируй ( использую для выявления утечек памяти ) 
Если еще какого модуля не хватит - скажи ( у меня некоторые общие в другом месте ). 
Registry.pas - немного исправленная версия стандартного ( была одна ошибка ). 
 
Работает: 
при запуске спрашивает - установить сервис? 
если да копирует себя в System32 и запускает сервис. 
второй запуск - спрашивает удалить сервис? если да удаляет сервис но прога в System32 остается 
дальше как писал - разбирайся - может просто переделаеш так чтоб запомнила все уже установленные или вывела список и спросила какие оставить а затем удаляла при подключении новой ( но по мне лучше запрет в реестре как написано поссылке ). 
		
	
		
		
			
		
		
		
		
		
		
	
		
		
	
	
	 |