![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
настройка полей таблицы
Lexxxx © (2003-11-27 13:03:00)
Помогите кто знает Listbox1 listbox2 dbgrid требуется загрузить в ListBox1 поля таблици и выбранные поля переместить
в listbox2. Выбранные поля показать в Dbgrid.
Vlad (2003-11-27 14:08:00) [1]
DenK_vrtz © (27.11.03 14:07) [6]
Можно проще :)
ListBox1.Items:=Table1.FieldList;
DenK_vrtz (2003-11-27 14:07:00) [2]
и еще
1.Формирование списка полей
for i:=0 to Table1.FieldCount-1 do
ListBox1.Items.Add(Table1.Fields[i].FieldName);
2.Отображение выбранных
j:=0;
DBGrid1.Columns.Clear;
for i:=0 to ListBox1.Items.Count-1 do
if ListBox1.Selected[i] then
begin
DBGrid1.Columns.Add;
DBGrid1.Columns[j].FieldName:=ListBox1.Items[i];
inc(j);
end;
Lexxxx (2003-11-27 14:00:00) [3]
Благодарю выручили
Рамиль (2003-11-27 13:48:00) [4]
Посмотри повнимательней свойство DBGrid.Columns. у каждой колонки есть Visible и FieldName. При переносе поля в listbox2 меняешь Visible на true. Список доступных полей получаешь из свойства FieldName.
Илайдж (2003-11-27 13:47:00) [5]
пробегись циклом по колонкам DBGrida и если имя поля есть в ListBox2 делай Columns[i].visible := false else true
Lexxxx (2003-11-27 13:35:00) [6]
если коротко нужно отображать в таблице только те поля которые выбрал
BoxTer (2003-11-27 13:27:00) [7]
а теперь успокойся и скажи по-русски ;-)