Скачать: CL | DM;

Добавление lookup-поля в ClientDataSet в runtime   Найти похожие ветки 

← →
vlad_ri   (2004-07-26 17:12) [0]

Интересно кто-то делал подобное?

 ClientDataSet1.Close;
 ANewField := TStringField.Create(ClientDataSet1);
 ANewField.FieldName := "Stat";
 ANewField.FieldKind := fkLookup;
 ANewField.DataSet := ClientDataSet1;
 ANewField.Name := ANewField.DataSet.Name + ANewField.FieldName;
 ANewField.KeyFields := "StationType";
 ANewField.LookupDataSet := ClientDataSet2;
 ANewField.LookupKeyFields := "IDStationType";
 ANewField.LookupResultField := "StationType";
 ANewField.Index := ClientDataSet1.FieldDefList.FieldByName("StationType").Index + 1;
 ClientDataSet1.FieldDefs.Add(ANewField.Name,ftString,10,false);
 ClientDataSet1.Open;

Вот после Open получаю ошибку "ClientDataSet1: Field "StationType" not found"

Где ошибка, как лечить?

---

← →
Rem   (2004-07-26 17:37) [1]

Сказано же:
 ClientDataSet1: Поле "StationType" не найдено.

2 варианта:
- подсоединил не к тому (что нужно) DataSet"У
- у нужного DataSet"а нет такого поля

---

← →
vlad_ri   (2004-07-26 17:52) [2]

А 3-го не дано?
Представьте себе что все поля на месте!

---

← →
Vlad ©   (2004-07-26 17:53) [3]

> vlad_ri   (26.07.04 17:12)  

Метод CreateDataSet Александр Сергеич вызывать будет ?

---

← →
vlad_ri   (2004-07-26 18:06) [4]

На счёт CreateDataSet я не знал, спасибо...
но он тоже не помогает, теперь ошибка появляется при вызове данного метода...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c