我想在dbgrid1中當我們輸入數據往下一行跳時判斷dbgrid1.fields[1].asstring是否為空.
如果為空的話跳出showmessage('不能為空').dbgrid1.fields[1]并取得焦點.
如果為空的話跳出showmessage('不能為空').dbgrid1.fields[1]并取得焦點.
解决方案 »
- 分享Delphi实现数学表达式的计算(逆波兰式法)-四则运算解析
- 我用remobjects 开发三层的时候,在本地测试可以,放在公网上就不行
- 线程中的对象TObject中创建ClientSocket.它的ClientSocketRead疑问..
- 求reportbuilder for delphi 6的安装密码
- 前途,我该何去何从!派分发泄!
- Delphi与ACCESS数据库的连接问题?高手请进!
- 在SQL中普通字符串与Unicode字符串有什么不同
- 本拉登接受崔永元采访CCTV实话实说
- 一个很简单的问题:如何让用户不能拖动窗体大小
- 谁有控件数组的CODE,给我一份学习学习
- 怎样将listview中的内容保存到一个文本文件中?
- SQLS中varchar转日期的问题,急!
if dbgrid1.fields[1].asstring='' then
showmessage('不能為空');
begin
if DataSet.Fields[1].AsString = '' then begin
ShowMessage('不能為空');
DBGrid1.SelectedIndex := 1;
Abort;
end;
end;