關於dbgrid的一個小問題

Question

我想在dbgrid1中當我們輸入數據往下一行跳時判斷dbgrid1.fields[1].asstring是否為空.
如果為空的話跳出showmessage('不能為空').dbgrid1.fields[1]并取得焦點.

Answer 1

在query的beforpost中写代码呀
if dbgrid1.fields[1].asstring='' then
 showmessage('不能為空');

Answer 2

procedure TForm1.Query1BeforePost(DataSet: TDataSet);
begin
  if DataSet.Fields[1].AsString = '' then begin
    ShowMessage('不能為空');
    DBGrid1.SelectedIndex := 1;
    Abort;
  end;
end;