проверка записей в DBGrid

[JDmit]

на форме есть Table, DataSource, DBGrid и кнопка

как сделать так, чтобы кнопка работала только при полностью заполненной записи в БД, а если запись заполнена не полностью (не все столбцы), то появлялось сообщение "заполните запись"

[evg_m]

var
  nullfield: TField;
  ds: TDataSet;
  s: string;

nullfield:=nil;
ds:=DBgrid.Datasource.dataSet;  //эта строка здесь 
только для того чтобы подчеркнуть что DBGrid здесь совсем не при чем. 
а нужен только набор данных связанный с ним.
for j:=0 to ds.fileds.count-1 do 
  if ds.fields[j].is null then begin
    nullfield:=ds.fields[j];
  end;
buttn.enabled:=(nullfield =nil);
if nullfiled<>nil then begin
  s:=format('пожалуйста заполните поле %s', [nullfield.fieldname] );
  showmessage(s);
end;

З.Ы. Хотя возможен и вариант и необходимости DBGrid, но задание в этом случае должно звучать немного по другому.

работала только при полностью заполненной записи в БД

[fbus]

вообще для этого целесообразней делать на других контролах (типа TEdit ну или по своему вкусу) и проверять уже в них. и кнопку "добавить" соответственно показывать если заполнены контролы. а dbgrid - это визуализация того что уже находится в таблице. т.е. если у Вас связь с БД настроена правильно то при вводе значения ячейки она УЖЕ записывается в БД.

[Аватар]

вообще для этого целесообразней делать на других контролах

С чего бы это? Право на жизнь имеют разные способы ввода информации. И далеко не факт, что при вводе значения ячейки она УЖЕ записывается в БД. В программе можно реализовать по разному

[JDmit]

все, разобрался) спасибо)

[ych_del]

Сообщение от Аватар

С чего бы это? Право на жизнь имеют разные способы ввода информации. И далеко не факт, что при вводе значения ячейки она УЖЕ записывается в БД. В программе можно реализовать по разному

Право-то имеют, базара нет. Но вот разделять просмотр и редактирование - это более чем целесообразно. Особенно, если не с TDBGrid работать (:.