Проблема создания loookup-овского поля программным путем

← →
Пубертанец (2003-06-23 13:57) [0]

Есть такой код:

Office := TStringField.Create(mDatSealDesigner.tOrder);
with Office do begin
FieldName := "Office";
Lookup:=true;
KeyFields:="ID_OFFICEN";
LookupDataSet:=dmNSI.clOffice;
LookupKeyFields:="id";
LookupResultField:="name";
DataSet := mDatSealDesigner.tOrder;
Name := mDatSealDesigner.tOrder.Name + FieldName;
mDatSealDesigner.tOrder.FieldDefs.Add(Name, ftString, 0, false);
end;

Так вот, если вызываю Open таблицы после этого кода, то ругается, что не найдено поле "ID_OFFICEN", а если до - то этот код не выполняется - пишет нельзя творить такого с open dataset.

← →
JibSkeart © (2003-06-23 13:59) [1]

а вы обратите внимание как это делается в IDE

← →
Пубертанец (2003-06-23 14:11) [2]

Если не секрет, как обратить внимание?

← →
Пубертанец (2003-06-23 15:05) [3]

Ну, не жмитесь

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