То ли 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; кричит на ошибку в модуле мидаса