這邊有個標準，如 輸入數值在1到1000 把輸入的數乘以5%;1000-2000 輸入的數乘以10%；這個怎么實作，求思路
uj5u.com熱心網友回復：
資料庫觸發器或者
增加函式欄位
uj5u.com熱心網友回復：
假如設定兩個欄位：“基數”“利潤”：使用DBEdit1對應“基數”,使用DBEdit2對應“利潤”。
在DBEdit1.OnChange事件中：
procedure TMyFrm.DBEdit1Change(Sender: TObject);
var N:Double;
begin
with DataModule1.ClientDataSet1 do
begin
N:=FieldByName('基數').asFloat;
if (N>0) and (N<1000) then N:=N*0.05
else begin
if (N>=1000) and (N<2000) then N:=N*0.1;
end;
Edit;
FieldByName('利潤').asFloat:=N;
Post;
end;
end;
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/81174.html
標籤：數據庫相關
上一篇：DelphiXE8使用ios模擬器編譯時報System Error.Code 2錯誤
下一篇：delphi 7 索引越界 list index out of bounds(-1) 求高手幫解決，搞了幾天了！！！