另外，需要進行如下說明：
...
Type
...
procedure MySetDBGrid(sTable:TTable;
tjDBGrid:TDBGrid);
function MyCreate_SQL(sTable,tjTable:
TTable;tjQuery:TQuery):boolean;
private
{ Private declarations }
...
值得說明的是，⑴為簡化程序，邏輯關系只提供了AND 和OR兩種，但為了允許用戶修改SQL語句，如：在多條件之間增加括號來改變運算順序等，增加了Memo控件；⑵在實際系統中，為方便用戶的操作，可增加幾個Button（按鈕），功能分別是對Table2的“增加”、“刪除”，這樣用戶界面會更友好些。
利用這種方法來設置查詢，條件個數是無限制的，且在屏幕上不會占據太大的空間，程序員實現起來要簡單得多了。
