數據輸入是開發數據庫程序的必然環節
由於用戶一次輸入的數據量一般情況下較小(不會超過幾百條記錄)
方法
第
第
TQuery
第
例如
SELECT Biolife
FROM ″biolife
where Biolife
這樣臨時表就建立完成了
方法
代碼如下
function CreateTableInMemory(const AFieldDefs:TFieldDefs):TDataSet;
var
TempTable:TClientDataSet;
begin
TempTable:=nil;
Result:=nil;
if AFieldDefs<>nil then
begin
try
TempTable:=TClientDataSet
TempTable
TempTable
Result:=(TempTable as TDataSet);
Except
if TempTable<>nil then
TempTable
Result:=nil;
raise;
end;
end;
end;
在程序中按如下方法使用
procedure TForm
var
ADataSet:TDataSet;
begin
ADataSet:=TDataSet
with ADataSet
begin
Add(′Name′
Add(′Value′
end;
with DataSource
begin
DataSet:=CreateTableInMemory(ADataSet
DataSet
end;
ADataSet
end;
臨時表創建完成
方法
二
有關數據庫程序分發時
[IDAPI Alias]
usesname=SYSDBA
password=masterkey
安裝程序後數據引擎自動配置完畢
三
程序員可能在用InterBase作為後台數據庫時
DECLARE EXTERNAL FUNCTION SUBSTR
CSTRING(
RETURNS CSTRING(
ENTRY_POINT ″IB_UDF_substr″ MODULE_NAME ″ib_udf″
其中
聲明後便可以使用
select SUBSTR(country)
from country
本例使用的是Delphi安裝時自帶的IBLocal數據庫
From:http://tw.wingwit.com/Article/program/Delphi/201311/8520.html