DBedit控件使用
上次修改时间: 2024-02-26 18:26:12 来源：网络总结 作者：钢铁长陈
上一页 路径：DSD\Learn\Delphi语言\常用控件之数据库控件与操作相关\ 下一页
用DBNavigator控件提交数据前给为空的DBEdit控件赋初值，在 DBEdit 的 OnDataChange 事件（顶部绿色处）
procedure TFastOpenFr.ds1DataChange(Sender: TObject; Field: TField);
begin
// 判断当前值是否为空
if (qry1.FieldByName('sort').AsString = '') or (qry1.fieldbyName('sort').isnull) then
begin
// 赋予默认值
DBEdit5.Text := '100';
end;
