delphi線程連接資料庫

① 請教delphi使用ADO連接資料庫失敗原因

這個問題可以考慮兩方面的情況：
第一，你的sql2000沒有打sp3或以上的補丁；
第二，你的sql沒有設置賬號登陸，可以在(local)(windows
nt)上右鍵-屬性-安全性-選上(sql
server和windows)-確定
問題應該就可以解決了……

② delphi連接mysql出現MySql server has gone away怎麼解決

MySQL server has gone away 問題的解決方法

mysql出現ERROR : (2006, 'MySQL server has gone away') 的問題意思就是指client和MySQL server之間的鏈接斷開了。

造成這樣的原因一般是sql操作的時間過長，或者是傳送的數據太大(例如使用insert ... values的語句過長， 這種情況可以通過修改max_allowed_packed的配置參數來避免，也可以在程序中將數據分批插入)。

產生這個問題的原因有很多，總結下網上的分析：

原因一. MySQL 服務宕了

判斷是否屬於這個原因的方法很簡單，進入mysql控制台，查看mysql的運行時長

mysql> show global status like 'uptime';
+---------------+---------+
| Variable_name | Value |
+---------------+---------+
| Uptime | 3414707 |
+---------------+---------+

1 row in set或者查看MySQL的報錯日誌，看看有沒有重啟的信息

如果uptime數值很大，表明mysql服務運行了很久了。說明最近服務沒有重啟過。
如果日誌沒有相關信息，也表名mysql服務最近沒有重啟過，可以繼續檢查下面幾項內容。

原因二. mysql連接超時

即某個mysql長連接很久沒有新的請求發起，達到了server端的timeout，被server強行關閉。
此後再通過這個connection發起查詢的時候，就會報錯server has gone away
（大部分PHP腳本就是屬於此類）

mysql> show global variables like '%timeout';
+----------------------------+----------+
| Variable_name | Value |
+----------------------------+----------+
| connect_timeout | 10 |
| delayed_insert_timeout | 300 |
| innodb_lock_wait_timeout | 50 |
| innodb_rollback_on_timeout | OFF |
| interactive_timeout | 28800 |
| lock_wait_timeout | 31536000 |
| net_read_timeout | 30 |
| net_write_timeout | 60 |
| slave_net_timeout | 3600 |
| wait_timeout | 28800 |
+----------------------------+----------+
10 rows in set

wait_timeout 是28800秒，即mysql鏈接在無操作28800秒後被自動關閉

原因三. mysql請求鏈接進程被主動kill

這種情況和原因二相似，只是一個是人為一個是MYSQL自己的動作

mysql> show global status like 'com_kill';
+---------------+-------+
| Variable_name | Value |
+---------------+-------+
| Com_kill | 21 |
+---------------+-------+
1 row in set原因四. Your SQL statement was too large.

當查詢的結果集超過 max_allowed_packet 也會出現這樣的報錯。定位方法是打出相關報錯的語句。

用select * into outfile 的方式導出到文件，查看文件大小是否超過 max_allowed_packet ，如果超過則需要調整參數，或者優化語句。

mysql> show global variables like 'max_allowed_packet';
+--------------------+---------+
| Variable_name | Value |
+--------------------+---------+
| max_allowed_packet | 1048576 |
+--------------------+---------+
1 row in set (0.00 sec)

修改參數：

mysql> set global max_allowed_packet=1024*1024*16;
mysql> show global variables like 'max_allowed_packet';
+--------------------+----------+
| Variable_name | Value |
+--------------------+----------+
| max_allowed_packet | 16777216 |
+--------------------+----------+
1 row in set (0.00 sec)

以下是補充：

應用程序長時間的執行批量的MYSQL語句。執行一個SQL，但SQL語句過大或者語句中含有BLOB或者longblob欄位。比如，圖片數據的處理。都容易引起MySQL server has gone away。

今天遇到類似的情景，MySQL只是冷冷的說：MySQL server has gone away。

大概瀏覽了一下，主要可能是因為以下幾種原因：
一種可能是發送的SQL語句太長，以致超過了max_allowed_packet的大小，如果是這種原因，你只要修改my.cnf，加大max_allowed_packet的值即可。

還有一種可能是因為某些原因導致超時，比如說程序中獲取資料庫連接時採用了Singleton的做法，雖然多次連接資料庫，但其實使用的都是同一個連接，而且程序中某兩次操作資料庫的間隔時間超過了wait_timeout（SHOW STATUS能看到此設置），那麼就可能出現問題。最簡單的處理方式就是把wait_timeout改大，當然你也可以在程序里時不時順手mysql_ping()一下，這樣MySQL就知道它不是一個人在戰斗。

解決MySQL server has gone away

1、應用程序長時間的執行批量的MYSQL語句。最常見的就是採集或者新舊數據轉化。或者長時間閑置資料庫連接（我的項目就是這樣）
解決方案：
在my.cnf文件中添加或者修改以下兩個變數：

1 wait_timeout=2880000 2 interactive_timeout = 2880000

關於兩個變數的具體說明可以google或者看官方手冊。如果不能修改my.cnf，則可以在連接資料庫的時候設置CLIENT_INTERACTIVE，比如：

1 sql = "set interactive_timeout=24*3600";
2 mysql_real_query(...)

2、執行一個SQL，但SQL語句過大或者語句中含有BLOB或者longblob欄位。比如，圖片數據的處理
解決方案：
在my.cnf文件中添加或者修改以下變數：

1 max_allowed_packet = 10M(也可以設置自己需要的大小)

max_allowed_packet 參數的作用是，用來控制其通信緩沖區的最大長度。

最近在做一個項目，需要程序24小時開著，而中間會有很多閑置時間，於是每天早上過來第一次操作資料庫時，就出現了「MySQL server has gone away」這樣的錯誤提示，而這個問題的原因是由於資料庫連接由於長時間沒有操作而會被自動關閉。解決這個問題，我的經驗有以下兩點，或許對大家有用處：
第 一種方法：
當然是增加你的 wait-timeout值，這個參數是在my.cnf(在Windows下台下面是my.ini）中設置，我的資料庫負荷稍微大一點，所以，我設置的值 為10，（這個值的單位是秒，意思是當一個資料庫連接在10秒鍾內沒有任何操作的話，就會強行關閉，我使用的不是永久鏈接 （mysql_pconnect),用的是mysql_connect,關於這個wait-timeout的效果你可以在MySQL的進程列表中看到 （show processlist) ），你可以把這個wait-timeout設置成更大，比如300秒，呵呵，一般來講300秒足夠用了，其實你也可以不用設置，MySQL默認是8個小 時。情況由你的伺服器和站點來定。
第二種方法：
這也是我個人認為最好的方法，即檢查 MySQL的鏈接狀態，使其重新鏈接。 （用mysql_ping()）
可能大家都知道有mysql_ping這么一個函數，在很多資料中都說這個mysql_ping的 API會檢查資料庫是否鏈接，如果是斷開的話會嘗試重新連接，但在我的測試過程中發現事實並不是這樣子的，是有條件的，必須要通過 mysql_options這個C API傳遞相關參數，讓MYSQL有斷開自動鏈接的選項（MySQL默認為不自動連接），但我測試中發現PHP的MySQL的API中並不帶這個函數，你重新編輯MySQL吧，呵呵。但mysql_ping這個函數還是終於能用得上的，只是要在其中有一個小小的操作技巧：

附錄：

mysqli_options()

定義和語法

mysqli_options() 函數設置額外的連接選項，用於影響連接行為。

mysqli_options() 函數可以被調用若干次來設置若干個選項。

注釋：mysqli_options() 函數可以在mysqli_init()之後和mysqli_real_connect()之前被調用。

語法：

1 mysqli_options(connection,option,value);

connection：必需。規定要使用的 MySQL 連接。

option:必需。規定要設置的選項。可以是下列值中的一個：

• MYSQLI_OPT_CONNECT_TIMEOUT - 以秒為單位的連接超時時間

• MYSQLI_OPT_LOCAL_INFILE - 啟用/禁用 LOAD LOCAL INFILE

• MYSQLI_INIT_COMMAND - 在連接到 MySQL 伺服器之後的執行命令

• MYSQLI_READ_DEFAULT_FILE - 從已命名的文件而不是 my.cnf 中讀取選項

• MYSQLI_READ_DEFAULT_GROUP - 從 my.cnf 或者 MYSQLI_READ_DEFAULT_FILE 中指定的文件中的已命名組中讀取選項

• MYSQLI_SERVER_PUBLIC_KEY - 基於 SHA-256 認證的 RSA 公共密鑰文件

value:必需。規定option的值。

mysql_ping()

mysql_ping指：本函數可用於空閑很久的腳本來檢查伺服器是否關閉了連接。

定義和語法

nt STDCALL mysql_ping(MYSQL *mysql);

描述：

檢查與服務端的連接是否正常。連接斷開時，如果自動重新連接功能未被禁用，則嘗試重新連接伺服器。該函數可被客戶端用來檢測閑置許久以後，與服務端的連接是否關閉，如有需要，則重新連接。

返回值：
連接正常，返回0；如有錯誤發生，則返回非0值。返回非0值並不意味著伺服器本身關閉掉，也有可能是網路原因導致網路不通。

錯誤碼：
CR_COMMANDS_OUT_OF_SYNC 命令以不正確的順序執行

CR_SERVER_GONE_ERROR 伺服器連接斷開

。。。

語法

mysql_ping(connection)

connection：可選。規定 MySQL 連接。如果未規定，則使用上一個連接。

③ Delphi的kbmMemTable控制項與AdoQuery有什麼區別

關於內存表的使用(kbmMemTable)

關於內存表的使用說明 一、 Delphi使用內存表 1.1Delphi創建內存表步驟： 1． 創建一個Ttable實例。 2． 設置一個DataBaseName為一個目錄或是已有的資料庫別名。 3． 指定TableName的值。 4．設置TableType屬性指明要創建的資料庫表類型。(如果此屬性為ttDefault表示資料庫類型與TableName指定值的擴展名對應)。 5． 調用TTable.FidldDefs對象的Add方法向資料庫表中添加欄位。Add有4個參數： 欄位名:string。 欄位類型：TfieldType。 欄位大小：Word。一般只對String和Memo類型使用。 欄位是否NotNull: Boolean。 6． 使用TTable.IndexDefs.Add()方法定義索引。Add有三個參數： 索引名：string; 索引欄位名：string; 索引類型：TIndexOptions; 7． 調用TTable的CreateTable。這種方法適用於本地表。SQL表要用TQuery來創建。 代碼如下： var MemTable: TTable; begin with MemTable.Create(Self) do begin DatabaseName := 'c:Temp'; TableName := 'Test'; TableType := ttParadox; with FieldDefs do begin Add('Age', ftInteger, 0, True); Add('Name', ftString, 25, False); Add('Weight', ftFloat, 0, False); end; IndexDefs.Add('', 'Age', [ixPrimary, ixUnique]); CreateTable; end; end; 二、 kbmMemTable使用簡述 2.1 kbmMemTable創建步驟： 1． 創建一個kbmMemTable對象實例。 2． 調用kbmMemTable.FidldDefs對象的Add方法向資料庫表中添加欄位。Add的方法和Delphi相同。 3． 使用kbmMemTable.IndexDefs.Add()方法定義索引。Add的方法和Delphi相同。 4． 調用kbmMemTable的CreateTable。 重要的區別：因為kbmMemTable不需要BDE的支持。所以不要指明DatabaseName, TableName和TableType三個屬性。 代碼如下： with kbmMemTable1 do begin with kbmMemTable1.FieldDefs do begin Clear; Add('Period', ftInteger, 0, false); Add('VALUE', ftLargeInt, 0, false); Add('BytesField', ftBytes, 20, false); Add('Color', ftInteger, 0, false); Add('Date', ftDate, 0, false); Add('Memo', ftMemo, 0, false); Add('AutoInc', ftAutoInc, 0, false); end; with kbmMemTable1.IndexDefs do begin Clear; Add('Index1', 'VALUE', []); end; CreateTable; end; 三、與Delphi創建內存表的對比 3.1主從表功能 kbmMemTable可以象其它TDataSet一樣，通過設置MasterSource和MasterField來簡單的完成主從表的操作。 3.2 SQL功能 沒有發現kbmMemTable可以支持SQL語句的操作。它提供按欄位排序和對排序欄位的查找功能。 三、 kbmMemTable特點 從其它TDataSet得到數據。 代碼如下： LoadFromDataSet(Table1, [mtcpoStructure, mtcpoProperties]); 這樣kbmMemTable就完全得到來自一個DataSet對象中的全部數據. 保存和載入內存表中數據的功能 Delphi的TTable不提供SaveToFile功能。 kbmMemTable提供保存到文件的功能，保存的文件有兩種格式： Options: TkbmMemTable.SaveFlags; 1． 二進制格式。kbmMemTable.SaveToBinaryFile('c: est.bin', Options). kbmMemTable1.LoadFromBinaryFile('c: est.bin') 2． .csv格式。kbmMemTable.SaveToFile('c: est.csv', Options); kbmMemTable1.LoadFromFile('c: est.csv') （一種Excel支持的文檔格式）打開後的內容如下： @@FILE VERSION@@ 200 @@TABLEDEF START@@ Period=Integer,0,"Period","",10 VALUE=LargeInt,0,"VALUE","",15 BytesField=Bytes,20,"BytesField","",10 Color=Integer,0,"Color","",10 Date=Date,0,"Date","",10 Memo=Memo,0,"Memo","",10 AutoInc=AutoInc,0,"AutoInc","",10 CALC=String,20,"CALC","",20 @@TABLEDEF END@@ Period VALUE BytesField Color Date Memo AutoInc CALC 1 198 0 02/11/2001 This is a memo%n2001-11-2 10:19:52 1 0 1-二月 2 196 3 03/11/2001 This is a memo%n2001-11-2 10:19:52 2 1 2-三月 在文檔的頭部份描述了表的欄位結構，在下面則是數據區域. 以下代碼用ClientDataSet建立內存表，包含Field1和Field2兩個欄位，在Field1上建索引： with ClientDataSet1 do begin //添加Integer類型的欄位Field1 with FieldDefs.AddFieldDef do begin DataType := ftInteger; Name := 'Field1'; end; //添加string類型的欄位Field2 with FieldDefs.AddFieldDef do begin DataType := ftString; Size := 10; Name := 'Field2'; end; //在Field1上建索引 with IndexDefs.AddIndexDef do begin Fields := 'Field1'; Name := 'IntIndex'; end; //創建內存表 CreateDataSet; end

》》》》》》》》》》》》》》》》》

KbmMemTable是一款高效且強大的內存表控制項，內存表顧名思義其最大的優勢就是速度，KbmMemTable不僅完美地實現了高效的特徵，同時，最新版本還支持索引、SQL語句等高級用法。其用法超簡單，基本用法和ClientDataSet一致，以下是我簡單的應用示例，實現了增刪改查等基本功能：

Delphi<wbr>:<wbr>kbmMemTable關於內存表的使用

unit Unit1

interface

use

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Grids, DBGrids, DB, StdCtrls, kbmMemTable

type

TForm1 = class(TForm)

Button1: TButto

DataSource1: TDataSource

DBGrid1: TDBGrid

Button2: TButto

Button3: TButto

Button4: TButto

Button5: TButto

Button6: TButto

Button7: TButto

rocere Button1Click(Sender: TObject)

rocere FormCreate(Sender: TObject)

rocere Button2Click(Sender: TObject)

rocere Button4Click(Sender: TObject)

rocere Button3Click(Sender: TObject)

rocere Button5Click(Sender: TObject)

rocere Button6Click(Sender: TObject)

rocere Button7Click(Sender: TObject)

rivate

{ Private declarations }

ublic

{ Public declarations }

end

var

Form1: TForm1

kbmMemTable1 : TkbmMemTable

Id:Integer

implementatio

{$R *.dfm}

rocere TForm1.Button1Click(Sender: TObject)

egi

//建表

kbmMemTable1.FieldDefs.Clear

kbmMemTable1.FieldDefs.Add('Id', ftInteger, 0, False)

kbmMemTable1.FieldDefs.Add('Value', FtString, 20, False)

kbmMemTable1.FieldDefs.Add('Time', ftDateTime, 0, False)

kbmMemTable1.IndexDefs.Add('Index1','Id',[]);//定義索引

kbmMemTable1.CreateTable

kbmMemTable1.Active := True

end

rocere TForm1.Button2Click(Sender: TObject)

var

fld_Id:TIntegerField

fld_Value:TStringField

fld_Time:TDateTimeField

i:Integer

egi

//插入

with kbmMemTable1 do

egi

DisableControls; //切斷數據感知控制項

try

Open; //打開

//定義Field

fld_Id:=TIntegerField(FieldByName('Id'))

fld_Value:=TStringField(FieldByName('Value'))

fld_Time:=TDateTimeField(FieldByName('Time'))

for i := 0 to 9 do

egi

Inc(Id)

Append; //附加數據

//賦值

fld_Id.AsInteger := Id

fld_Value.AsString := 'Hello PFeng!'+inttostr(Id)

fld_Time.AsDateTime := Now

Post; //確定

end

UpdateIndexes;//更新索引

finally

EnableControls; //連接數據感知控制項

end

end

end

rocere TForm1.Button3Click(Sender: TObject)

var

fld_Id:TIntegerField

fld_Value:TStringField

fld_Time:TDateTimeField

egi

//更新

with kbmMemTable1 do

egi

Ope

fld_Id:=TIntegerField(FieldByName('Id'))

fld_Value:=TStringField(FieldByName('Value'))

fld_Time:=TDateTimeField(FieldByName('Time'))

if Locate('Id',5,[]) the

egi

Edit

fld_Value.AsString := '內容被修改'

fld_Time.AsDateTime := Now

Post

end

end

end

rocere TForm1.Button4Click(Sender: TObject)

var

fld_Id:TIntegerField

fld_Value:TStringField

fld_Time:TDateTimeField

egi

//查詢

with kbmMemTable1 do

egi

Ope

fld_Id:=TIntegerField(FieldByName('Id'))

fld_Value:=TStringField(FieldByName('Value'))

fld_Time:=TDateTimeField(FieldByName('Time'))

if Locate('Id',5,[]) the

ShowMessage(fld_Value.AsString)

//還可以用FindKey實現，結合索引速度更快

// kbmMemTable1.IndexFieldNames:='Id'

// if kbmMemtable1.FindKey([5]) then ...

end

end

rocere TForm1.Button5Click(Sender: TObject)

var

fld_Id:TIntegerField

fld_Value:TStringField

fld_Time:TDateTimeField

egi

//刪除

with kbmMemTable1 do

egi

Ope

fld_Id:=TIntegerField(FieldByName('Id'))

fld_Value:=TStringField(FieldByName('Value'))

fld_Time:=TDateTimeField(FieldByName('Time'))

if Locate('Id',5,[]) the

egi

Delete

UpdateIndexe

end

end

end

rocere TForm1.Button6Click(Sender: TObject)

var

fld_Id:TIntegerField

fld_Value:TStringField

fld_Time:TDateTimeField

id:Integer

egi

//循環比較最小值

with kbmMemTable1 do

egi

Ope

fld_Id:=TIntegerField(FieldByName('Id'))

fld_Value:=TStringField(FieldByName('Value'))

fld_Time:=TDateTimeField(FieldByName('Time'))

DisableControl

try

First

id := fld_Id.AsInteger

while not Eof do

egi

if id > fld_Id.AsInteger the

id := fld_Id.AsInteger

Next

end

Locate('Id',id,[])

finally

EnableControl

end

end

end

rocere TForm1.Button7Click(Sender: TObject)

egi

//清空

kbmMemTable1.EmptyTable

end

rocere TForm1.FormCreate(Sender: TObject)

egi

kbmMemTable1 := TkbmMemTable.Create(Self)

DataSource1.DataSet := kbmMemTable1

end

end.

http://www.pfeng.org/archives/372

》》》》》》》》》》》》》》》》》》》》》》》》》》

前端時間一直在研究三層通訊框架，計劃封裝一套穩定性較好的遠程資料庫服務介面，前期的方案主要有以下幾種： 1,改造自己寫的indy+壓縮xml流三層應用項目 2,基於MMZ asio遠程資料庫項目進一步完善 3,尋找並測其他相對成熟的三層通訊框架，知道的有：QuickBurro、RemoteAdo、Middle ADO System、dbIOCP、DataSnap、ASTA、Remobject SDK、kbmMW，接下來我將就我對以上三層框架的淺薄認識一一說明。 首先說方案1，在早些時候為了實現遠程資料庫與本地資料庫的同步，我寫過一套基於indy+壓縮xml流的C/S應用，客戶端的請求封裝在xml中，發送到服務端，服務端在資料庫中執行後，把執行結果（例如結果集）拼裝成xml再壓縮成流，返回到客戶端，雖然當時基本上滿足了需求，但項目有著很大的局限：並發性差、效率低、通訊不穩定等，一旦網路條件稍差，服務端就會報異常，想想那段維護服務端軟體的日子簡直就是噩夢，如果本次項目仍然採用這種思路，我需要去改進很多地方，比如資料庫連接池、多線程、數據校驗、底層通訊等，在有限的時間里很難去把多個方面都做穩定，權衡後，覺得自己應該站在巨人的肩膀上來實現自己的業務邏輯，於是放棄了這個方案。 方案2，ASIO（http://think-async.com/）是C++的一個強大的通訊庫，據說是工業級別的，我的一個Delphi技術群（群號：15637473）的群主把ASIO編譯成了一個DLL動態庫，然後又結合unidac、連接池等，封裝了一個簡單的三層通訊框架MMZ ASIO（http://mmz-asio4delphi.googlecode.com），我在早些時候用這個框架做了幾個小項目，感覺比較簡單，效率也很高，但是有幾個bug遲遲得不到解決（客戶端不能主動斷開、服務端容易報線程異常等），給群主寫郵件，群主說他現在很忙，沒時間解決這些問題，而以我個人的水平，又很難去從核心代碼上做改動。目前有幾個忠實的asio愛好者還在深入研究（群號：91684553），相信有朝一日會穩定起來，考慮到時間成本，同樣放棄了這個方案。

最後，最佳的選擇就是選擇一款成熟的三層框架，在此基礎上做二次開發，於是從網上搜了好幾天時間，了解各個框架的情況，首先基於成本和穩定性的考慮放棄了國產框架： 1,QuickBurro（http://www.quickburro.com/），樵夫的作品，到目前還一直在做升級，具體價格參見2,http://www.quickburro.com/orders.html，授權方式比較寬松，免費版的用戶數有限制（好像是16個？不確定）。 3,RemoteAdo（http://www.remoteado.cn/index.html），了解的不多，但是就從網站上來介紹來看，功能比較局限，當然，也是收費的。 4,Middle ADO System（http://www.middle-ado.com/），廈門一家公司的產品，同樣了解的不多，價格不詳，功能也比較局限。 5,dbIOCP（群號：35916846），楠楠的作品，據說效率很高（IOCP不多說，網上一搜便知道），價格好像是3000/套，帶源碼，升級不是很頻繁，網上的免費1.6版連楠楠自己都說已經很久了，我看群里很多討論2.4版本的，楠楠同樣自己說性能沒法和3.x版本的比，新版的架構都變了，效率說的很神，但是個人作品，在沒有很好地推廣的情況下，3000刀個人感覺有點兒貴。

再來說其他的幾個著名框架： 1,DataSnap，這個其實很多人都比較熟悉，它是Delphi的三層框架MIDAS的延續，李維在多次講座和個人書籍中都強烈推薦，而且國外社區很多人都提到它，估計能力不俗，但是網上褒貶不一，個人深入了解的不夠。 2,ASTA（http://www.astatech.com/procts/asta3/），也是一個老牌的三層框架，據說在200x年的時候很火，但是開發者後續升級不給力，單從網站首頁上的新聞就讓人很驚訝：ASTA 3.1 is here and it』s HOT with support for Delphi 2006…當然，如果你還在用D2007以下版本做開發的話，可以試試，但是我個人覺得缺乏後續的SAU(Service and Update)，心理上總是不踏實。價格不詳，但是網上Full Source版本的一搜一大把。 3,Remobject SDK（http://www.remobjects.com/default.aspx），其實我對這個框架的印象很好，因為之前計數群里已經基於它做了很多成熟的項目，而且在討論過程中口碑也相當不錯，而且現在for XE2的版本網上也很好找到，建議有興趣的人可以深入研究以下。 4,KbmMW（http://www.components4programmers.com/procts/kbmmw/index.htm），說到本文的重點了，KbmMW在國內圈子裡能夠得到認可，很大程度上得益於窯主xalion詳細的博文教程（http://www.cnblogs.com/xalion/），作者Kim Madsen對中國國情的充分考慮（對中國程序員價格上優惠25%），KbmMW在國外社區很火，國內可能很多人對kbmMemTable都不陌生，而KbmMW也是基於kbmMemTable做的封裝。我對KbmMW最大的認可就是其開放的架構思路：通訊控制項支持Indy（9和10）、Synapse、DxSock，資料庫控制項支持ADO和Unidac等、當然還有其他的加密、壓縮等均支持開源的第三方控制項，給開發人員了很大自由度。作者的熱心也讓我很感動，每次遇到問題，白天我在StackOverFlow上提問，夜裡Kim就在上面認真回答。 當然還有很多其他的優秀框架（據說Dephi的三次框架解決方案是所有開發語言中最多的），比如德國的RTC（http://www.realthinclient.com/）據說也是很不錯的，有興趣的可以自己去了解下，當我了解了KbmMW之後，我覺得，KbmMW是我最好的選擇。

接下來的博文中，我不再累述教程（沒法超越窯主xalion的高度），更側重資源的分享，容易犯錯的地方提醒、原有Bug的勘誤，自己開發經驗的總結，希望能夠有興趣或有需求的人提供一些幫助。