Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Очистка StrinGrid

50K
22 декабря 2011 года
Aden
43 / / 24.10.2011
Помогите, кто может!!! Очень нужно.
1) Сначало получаю значение из ячейки
 
Код:
void __fastcall TFrame_JZajav::sgGZajavSelectCell(TObject *Sender, int ACol,
          int ARow, bool &CanSelect)
{
 KOD_Z=StrToInt(sgGZajav->Cells[1][ARow]);
 frZaiavka->Frame_Zajavka1->edNomDem->Text=KOD_Z;
 KOD_STAT=StrToInt(dmOne->Val1_po_Val2("DEMAND_STATUS","KOD","NAIM",sgGZajav->Cells[10][ARow]));
 }

2)Далее мне нужно перейти на вкладку, и первым делом почистить StringGrid,
 
Код:
void __fastcall TdmOne::ClearGrid(TStringGrid *sgCl)
{
 int j;
 for (j = 0; j<sgCl->ColCount; j++) sgCl->Cols[j]->Clear();
         sgCl->ColCount=2;
         sgCl->RowCount=2;
         sgCl->RowHeights[0]=sgCl->DefaultRowHeight;
        sgCl->ColWidths[0]=sgCl->DefaultColWidth;
}

а как только становлюсь на
 
Код:
for (j = 0; j<sgCl->ColCount; j++) sgCl->Cols[j]->Clear();

выдает ошибку Path sourse file: grids pas
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог