[WMaxaW]

Есть DBCtrlGrid (прицеплена к запросу)10Х7 в ней только DBCheckBox (прицеплен к полю Занято)получается что-то на подобие двумерного массива.
Хотелось бы узнать возможно ли чтобы какая то одна строчка из состоящая DBCheckBox из в CtrlGrid была недаступна
Запрос вот:

Код:

Active:=false  ;
SQL.Clear;
SQL.Add('SELECT Т_Расписание_по_часам.Код_расписания_по_часам, Т_Расписание_по_часам.Код_расписания, Т_Расписание_по_часам.Время_с, Т_Расписание_по_часам.Занято, Т_Врач.Фамилия_врача,Т_Расписание.Вид_дня ');
SQL.Add('FROM Т_Врач , Т_Расписание ,Т_Расписание_по_часам ');
SQL.Add('WHERE Т_Расписание.Код_расписания = Т_Расписание_по_часам.Код_расписания and Т_Врач.Код_врача = Т_Расписание.Код_врача') ;
SQL.Add('and  Фамилия_врача="'+DBLookupComboBox1.Text+'"');
sql.Add('and Т_Расписание_по_часам.Время_с>=DateValue('''+DateToStr(datf1)+''')');
sql.Add('and Т_Расписание_по_часам.Время_с<DateValue('''+DateToStr(datf2)+''')');
Active:=true;

[WMaxaW]

Пыталась как-то так(знаю что неверно и глупо)

Код:

datamodule2.ADOQRasisChas.First;
for i:=0 to       datamodule2.ADOQRasisChas.RecordCount-1 do
 begin
 if datamodule2.ADOQRasisChas.FieldByName('Вид_дня').AsString='Выходной' then
  begin
  DBCheckBox2.Enabled:=false;
  showmessage('Врач в этот день не работает');
  end
  else  DBCheckBox2.Enabled:=true;
  datamodule2.ADOQRasisChas.Next;
 end;

Понимаю что надо привязываться к номеру записи но не знаю как осуществить... и на какую процедуру все пасадить чтоб работало намано

[WMaxaW]

Может кто подскажет как запомнить номер записи по щелчку на сомвовох