There are a number of blog posts that explain how to create your own custom Live Templates for Delphi 2006, and I had to create a few of my own recently. One Live Template was called "log" and expanded to a call to my logging routines (I can imagine something like that to exist - now or shortly - for CodeSite as well).
Another perhaps useful one is for the MessageDlg, as is defining the points for the Message, MessageType and MessageButtons. The XML is as follows (just copy and paste into an .xml file placed somewhere in your BDS\4.0\Objrepos\code_templates\delphi directory):
<?xml version="1.0" encoding="utf-8" ?>The effect of this code template in action is as follows:
<codetemplate xmlns="http://schemas.borland.com/Delphi/2005/codetemplates" version="1.0.0">
<template name="md" invoke="auto">
<description>MessageDlg live template</description>
<code language="Delphi" delimiter="|">
<![CDATA[MessageDlg('|Message|', |MessageType|, [|MessageButtons|], 0);|end|]]>