使用Delphi7 SQL Exploer 開啟SQLite3

方法一

1.      開啟SQL Exploer

2.      按滑鼠右鍵建立新連線

3.      選擇Database Driver Name

4.      選擇Database Name

5.      Apply

6.      選擇ODBC DSN

7.      Apply

8.      連線資料庫

9.      直接按OK開啟

這個方式會看不到MEMO格式的欄位

 

方法二

使用TADOQuery搭配使用連線字串connectstring

"DRIVER=SQLite3 ODBC Driver;Database=d:\demo.db;LongNames=0;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0"

DB name = d:/demo.db

用datasource and dbgrid 並把TADOQuery active=true 就可顯示MEMO欄位

 顯示MEMO就要在該欄位Query Field 事件作轉換動作GetText

exp:

procedure Tmain.Query_fieldmemoGetText(Sender: TField;var Text: String; DisplayText: Boolean);
begin
  inherited;
  Text := Sender.AsString;
end;