Как динамически добавить в ClientDataSet поле SmallInt чтобы.... [D7, firebird 1.5]
Artem123 © (2004-08-26 09:39:00)
схема следующая
SqlConn->Sqltable->Provider->ClientdataSet->DAtaSource-DDgrid
Возникла следующая задача создать поле чтоб оно было на
каждом компьютере локально у каждого пользователя свое.
При выполненнии следущего кода в ClientDataSet добавляется
новое поле и выводится в грид только оно одно (остальные поля
которые должны выводиться мз SqlTable не выводятся), если в
ClientDataSet в редакторе полей прописать все остальные поля то
ClientDataSet отобразит в гриде все поля соответственно вместе с
динамически созданным. Как сделать чтоб отображались все поля с
динамическим только чтоб в редакторе полей не прописывать ни одного
поля железно
var
T : TField;
begin
T := TSmallintField.Create(ClientDataSet1);
T.FieldName := 'new_field';
T.Name := ClientDataSet1.Name + T.FieldName;
T.Index := ClientDataSet1.FieldCount;
T.DataSet := ClientDataSet1;
T.FieldKind:=fkInternalCalc;
T.Visible:=true;
ClientDataSet1.FieldDefs.UpDate;
ClientDataSet1.Open;
end;
Desdechado (2004-08-26 10:43:00) [1]
ничего не понял...
Тебе нужно, чтобы какое-то специфическое поле показывалось
вне зависимоси от того, есть ли другие поля и какие они?
Наверх 
ЧАТ |
Орешник |
|
