Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как добавить колонку в DBGrid? [D5]

serg128 © (2004-06-16 16:02:00)
Делаю так:
int col = DBG->Columns->Count - 1;
DBG->Columns->Add();
DBG->Columns->Items[col]->FieldName = "ANALIT";
DBG->Columns->Items[col]->Title->Caption = "ANALIT";
DBG->Columns->Items[col]->Width = 300;

А он пишет "Grid index out of range"? В чем тут дело?

Sandman25 (2004-06-16 17:26:00) [1]
Перезагрузитесь, у Вас отладчик "дуркует"

serg128 (2004-06-16 17:24:00) [2]
Он вываливается на строчке: DBG->Columns->Add();
...я уже совсем потерялся...... :((

Sandman25 (2004-06-16 17:20:00) [3]
DBG->Columns->Add();
int maxIndex = DBG->Columns->Count;
DBG->Columns->Items[maxIndex]->FieldName = "f" + ldAccs->FieldByName("US_NAME")->AsString;
и т.д.

serg128 (2004-06-16 17:13:00) [4]
Ошибка та-же, просто я подозреваю, что это из-за того, я до этого добавил динамически поля...

j++;
ldAccs->First();
while(!ldAccs->Eof)
{
if(ldAccs->FieldByName("SIDE")->AsString == "-1")
{
DBG->Columns->Add();
DBG->Columns->Items[j]->FieldName = "f" + ldAccs->FieldByName("US_NAME")->AsString;
DBG->Columns->Items[j]->Title->Caption = ldAccs->FieldByName("US_NAME")->AsString;
DBG->Columns->Items[j]->Width = 70;
j++;
}
ldAccs->Next();
}

Sandman25 (2004-06-16 17:07:00) [5]
"Не верю" (c).
Сначала count будет 0, после добавления первой колонки появится Items[0] и ошибки быть не должно. Если у Вас теперь возникает другая ошибка, то это не значит, что "Не помогает" :)

serg128 (2004-06-16 17:04:00) [6]
Не помогает

Sandman25 (2004-06-16 16:55:00) [7]
-1 уберите.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »