![]() |
|
#11
|
|||
|
|||
![]() То ли Midas кривой, то ли ClientDataSet
Вот так все работает: Код:
procedure TTypeNumber.Button1Click(Sender: TObject); var i:integer; begin i:=2; ClientDataSet1.Locate('Cod',i,[]); ClientDataSet1.Edit; ClientDataSet1.FieldByName('Flag').Value:=True; ClientDataSet1.First; end; end; А Код:
ClientDataSet1.FieldByName('Flag').NewValue:=True; |