TClientDataSet нужна помощь
Здравствуйте.
На форме стоит TPageControl. Есть база. Доступ через TClientDataSet. В базе присутствует поле ItemType. На страницах TPageControl - таблицы.
В зависимости от того, какая страница TPageControl выбрана, необходимо полю ItemType присваивать значение по умолчанию. Например если выбрана PageControl1.ActivePage = TabSheet1, то в поле ItemType при добавлении новой записи должно автоматом заноситься '1'
Все поля в TClientDataSet добавлял через FieldDefs. Но вот как сделать присвоение определённому полю в определённых условиях значение по умолчанию - так и не могу разобраться.
При попытке добавления полей в FieldsEditor выдаёт "ClientDataSet1: Missing data provider or data packet". А без добавления полей не получается ClientDataSet1ItemType.DefaultExpression := '1'
Возможно сильно сумбурно написал вопрос...
|