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

Вниз

Как добавить колонку в DBGrid?   Найти похожие ветки 

 
serg128   (2004-06-16 16:02) [0]

Делаю так:
   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 16:55) [1]

-1 уберите.


 
serg128   (2004-06-16 17:04) [2]

Не помогает


 
Sandman25 ©   (2004-06-16 17:07) [3]

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


 
serg128   (2004-06-16 17:13) [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:20) [5]

DBG->Columns->Add();
int maxIndex = DBG->Columns->Count;
          DBG->Columns->Items[maxIndex]->FieldName      = "f" +                    ldAccs->FieldByName("US_NAME")->AsString;
и т.д.


 
serg128   (2004-06-16 17:24) [6]

Он вываливается на строчке: DBG->Columns->Add();
 ...я уже совсем потерялся...... :((


 
Sandman25 ©   (2004-06-16 17:26) [7]

Перезагрузитесь, у Вас отладчик "дуркует"



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

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

Наверх




Память: 0.48 MB
Время: 0.043 c
3-1087213459
Pul
2004-06-14 15:44
2004.07.11
Declared cursor already exist


1-1088174609
Максим
2004-06-25 18:43
2004.07.11
Есть ли ещё способы создания текстового файла, кроме AssignFile?


3-1087192084
Tariel
2004-06-14 09:48
2004.07.11
InterBase - Сколько раз выполняется вложенный запрос в where


1-1088594179
half_litre
2004-06-30 15:16
2004.07.11
Не срабатывает OnClose. Правильно ли это ?


1-1088368968
juiceman
2004-06-28 00:42
2004.07.11
Delphi Script