[MS SQL] XML資料型態

之前寫過一篇 MS SQL 利用Trigger紀錄Table異動資料，
雖然可以記錄每次異動的資料，但缺點就是每個table欄位不同，
就要將每個要記錄的table分開新建tablex來記錄，感覺似乎也不太適合大量使用，
後來有用到XML STUFF，發現XML格式也可適用此問題，來達到記錄異動資料的需求，
好處就是不用考慮每個表格欄位數的多寡，一個欄位就可以達到記錄目的！

[MS SQL] 查詢包含特定字串之Proc、Function、View

--查詢包含特定字串之Proc、Function
DECLARE @TmpStr NVARCHAR(MAX)='Factory=@CorpNo'

SELECT ROUTINE_SCHEMA, ROUTINE_NAME, ROUTINE_TYPE, ROUTINE_DEFINITION
FROM INFORMATION_SCHEMA.ROUTINES
WHERE ROUTINE_DEFINITION LIKE '%'+@TmpStr+'%'
AND ROUTINE_TYPE ROUTINE_TYPE IN ('PROCEDURE','FUNCTION')

--查詢包含特定字串之View
SELECT TABLE_NAME,VIEW_DEFINITION
FROM INFORMATION_SCHEMA.VIEWS
WHERE VIEW_DEFINITION LIKE '%'+@TmpStr+'%'

參考自-青年廣論研討班-如何在SQL Server 資料庫中 找出符合你的關鍵字的Store Procedure

[敗家] ICCASU帆布鞋 男鞋/女鞋

在PTT合購版望穿秋水，終於讓我成功買到ICCASU帆布鞋了，
先前幫老婆買過ICCASU的雪靴，評價不錯，
所以一直有在注意這個牌子的鞋子，這次一看到帆布鞋開團，
查了一下先前的評價都不錯，畢竟從對岸買東西，運費也不便宜，
儘量湊滿重量比較實惠，於是一口氣買了兩雙男鞋+女鞋...

男-牛仔藍 / 男-卡其 / 女-鏡面紅花

[Delphi][MS SQL] HOST_NAME()抓取主機名稱錯誤

前幾天寫了一個當登入失敗時，紀錄登入者的IP、主機名稱、時間...等，
今天去看LOG檔才發現，怎麼主機名稱都一樣 ，
明明在MS SQL Server Management Studio執行時都可以正常抓取，
後來才發現在Delphi內的ADO Connection設定連線時，
會將連線主機的名稱寫在Connection內的Workstation中，
而當我們使用T-SQL執行HOST_NAME()時，
反而直接抓取此參數資料，而非透過Server查詢，

[Chrome][Firefox] Stylish Script推薦

因為習慣使用MacType渲染字體，但這兩家瀏覽器改版的特別勤快，
原本可以正常渲染的字型，改版後突然變得不行，
研究了一陣子，才知道有Stylish這東西，
可以透過CSS修改字型顯示，甚至修改網站的版面，
下面列出目前我有在使用的幾個不錯的Script~

[MS SQL] 查詢TABLE相關資訊

MS SQL Server內建sp_name可查詢表格的結構，
但是如果表格內有欄位描述時，使用sp_name是無法顯示出來，

[Chrome]更新後設定頁面空白無法正常顯示

因為一習慣使用MacType渲染字體，但Chrome升級36版後一直有一個困擾，
就是設定頁面都無法正常顯示，這樣都無法進行設定的變更，
連帶擴充套件也是一樣的問題，甚至讓我一度想要跳回去Firefox，

[Delphi] 設定Windows作業系統預設印表機

Procedure SetDefaultPrinter(xPrintName: string);
var

  buffer: array[0..255] of Char;
  name: string;
begin

  name := xPrintName;
  if AnsiPos(',', name) = 0 then begin
    name := name + ',';
  end;

  StrPCopy(buffer, name);
  WriteProfileString('windows', 'device', buffer);
  StrCopy(buffer, 'windows');
  SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, Longint(@buffer));
end;

參考自-Solnone 螺旋旅人-Delphi 設定預設印表機

[Chrome] 使用Stylish取代MacType渲染

一直以來都有使用MacType渲染的習慣(EzgdiV5)，

尤其是Windows原生的字體超細，瀏覽網頁看久了都會不舒服，

不過自從Chrome 32bit-3X版 和 64bit 開始，MacType的渲染失效了，

整個就是不習慣，只好一直忍著不升級，

一直到發現可以用Stylish修改，才把版本升上來試用看看，感覺效果還不錯！

[Delphi XE7]TListView MultiDetailItem 安裝

TListView預設只能顯示一筆Detail，
如果想要顯示多筆資訊，需要自己手動Install Package，即可達到需求。

1. 預設文件中即包含安裝檔，按照下列路徑尋找
C:\Users\Public\Documents\Embarcadero\Studio\15.0\Samples\Object Pascal\Mobile Samples\User Interface\ListView

2. 查詢 *.dpk檔，打開檔案
SampleListViewRatingsAppearancePackage.dpk

SampleListViewMultiDetailAppearancePackage.dpk