Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.22;
Скачать: 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 вся ветка

Текущий архив: 2004.08.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
3-1090671591
Dalex
2004-07-24 16:19
2004.08.22
BDE MySql


1-1091642631
Phoe-NIX
2004-08-04 22:03
2004.08.22
Текстовый ресурс -> TStringList


14-1091295618
Guest
2004-07-31 21:40
2004.08.22
Добрый вечер.Подскажите как найти кол-во строк в списке


1-1091691966
Alek
2004-08-05 11:46
2004.08.22
UTF-8


14-1091616142
Bless
2004-08-04 14:42
2004.08.22
Зачем нужен фаервол?