![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Добавление lookup-поля в ClientDataSet в runtime [D7, MSSQL]
vlad_ri © (2004-07-26 17:12:00)Интересно кто-то делал подобное?
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"
Где ошибка, как лечить?
vlad_ri (2004-07-26 18:06:00) [1]На счёт CreateDataSet я не знал, спасибо...
но он тоже не помогает, теперь ошибка появляется при вызове данного метода...
Vlad (2004-07-26 17:53:00) [2]
> vlad_ri (26.07.04 17:12)
Метод CreateDataSet Александр Сергеич вызывать будет ?
vlad_ri (2004-07-26 17:52:00) [3]А 3-го не дано?
Представьте себе что все поля на месте!
Rem (2004-07-26 17:37:00) [4]Сказано же:
ClientDataSet1: Поле 'StationType' не найдено.
2 варианта:
- подсоединил не к тому (что нужно) DataSet'У
- у нужного DataSet'а нет такого поля