Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.10;
Скачать: CL | DM;

Вниз

Не выходит создание Lookup-поля програмно   Найти похожие ветки 

 
Шурик Ш ©   (2002-09-20 12:34) [0]

Что я делаю неправильно?
NewField := TField.Create(ListQuery);
NewField.FieldName := "Look";
NewField.SetFieldType(ftString);
NewField.Lookup := True;
NewField.KeyFields := "PTR_ID";
NewField.DataSet := Table1;
NewField.LookupKeyFields := "ID";
NewField.LookupResultField := "NAME";
ListQuery.Fields.Add(NewField);


 
ЮЮ ©   (2002-09-20 12:44) [1]

NewField := TStringField.Create(ListQuery);

procedure SetFieldType(Value: TFieldType);

Description

As implemented in TField, SetFieldType does nothing. Descendant classes override SetFieldType to set the DataType for the field component. SetFieldType is useful for derived classes that can support more than one underlying data type. For example, a TBlobField may support ftBlob, ftFmtMemo, ftParadoxOle, ftDBaseOle, or ftTypedBinary.


 
Шурик Ш ©   (2002-09-20 14:51) [2]

NewField := TStringField.Create(ListQuery);
NewField.FieldName := "Look";
NewField.Lookup := True;
NewField.KeyFields := "PTR_ID";
NewField.DataSet := Table1;
NewField.LookupKeyFields := "ID";
NewField.LookupResultField := "NAME";
NewField.DataSet.Active := True;
ListQuery.Fields.Add(NewField);

На строке NewField.DataSet.Active := True программа останавливается с сообщением "Lookup information for field "Look" is incomplete". А где здесь неполная информация я не знаю. Вроде в диалоге создания Lookup-поля в режиме дизайна нет больше полей, кроме поля Component, а что это я не знаю.


 
Шурик Ш ©   (2002-09-20 15:35) [3]

Типа, Up!


 
Johnmen ©   (2002-09-20 15:59) [4]

Типа, может поменять местами 2 последние строки ?.....:)))


 
Шурик Ш ©   (2002-09-20 16:01) [5]

Нет, одну ошибку я уже нашел.
Не NewField.DataSet, а NewField.LookupDataSet


 
Johnmen ©   (2002-09-20 16:11) [6]

И NewField.DataSet тоже нужен !!!



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
1-31894
PaRL
2002-09-29 15:28
2002.10.10
Глобальные переменные.


1-31840
PaRL
2002-09-28 16:58
2002.10.10
---|Ветка была без названия|---


1-31688
REA
2002-09-25 16:14
2002.10.10
DLL и компоненты


1-31829
pvasya
2002-09-28 09:53
2002.10.10
EOleException


4-32055
SPeller
2002-08-22 20:44
2002.10.10
Скроллбар