2009年3月10日 星期二

Crystal Report 的民國100年問題

Crystal Report (8、9、11) 的日期物件,若選用「中華民國曆」格式的話,「年」只會出現兩位
使得民國 100 年變成了「00」
可以使用以下的公式來處理 (Crystal 語法)
Trim(CStr(Year(日期) - 1911, '#00')) + '/' + CStr(Month(日期), '00') + '/' + CStr(Day(日期), '00')

2012/03/06 更新:原先的版本沒有考慮到 null 的問題,改成以下這樣
if (aDate >= CDate('1899/12/31')) then
  Trim(CStr(Year(aDate) - 1911, '#00')) + '/' + CStr(Month(aDate), '00') + '/' +  CStr(Day(aDate), '00')
else
  ''

2009年3月4日 星期三

Delphi 2009 的函式說明自動完成模板

選擇 File -> New -> Other -> Code Template
將以下內容貼進去然後存檔
就可以按 Ctrl-J 選擇 summary,或是輸入 summary 之後按 Ctrl-J 自動出現函式說明的標籤了

<?xml version="1.0" encoding="utf-8" ?>
<codetemplate    xmlns="http://schemas.borland.com/Delphi/2005/codetemplates"
                version="1.0.0">
    <template name="summary" invoke="auto">
        <point name="comment">
            <hint>
                函數的說明文字
            </hint>
            <text/>
        </point>
        <description>
            Help Insight XML Documentation comment with "summary" element
        </description>
        <author>
            CodeGear
        </author>
        <code language="Delphi" context="methodbody" delimiter="|"><![CDATA[
/// <summary>
///   |comment|
/// </summary>
///   <param name="">
///   </param>
///   <param name="">
///   </param>
///   <param name="">
///   </param>
/// <returns>
/// </returns>
/// <remarks>
/// </remarks>]]>
        </code>
    </template>
</codetemplate>