Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

StringGrid ... достал уже если честно своей простотой..


Андрей Сенченко ©   (2002-03-25 13:13:00) 

Проверяю содержимое ячеек на наличие некорректной ( с мой точки зрения ) информации. При обнаружении таковых делаю следующее:

Rect := StGridWork.CellRect(1,i);
with StGridWork.Canvas do
begin
Brush.Color := clRed;
Font.Color := clYellow;
FillRect(Rect);
TextOut(Rect.Left,Rect.Top,"ОШИБКА");
end

... То есть собственно делаю временную перерисовку ячейки. И работает это совершенно изумительно, пока искомая ячейка находится в области видимости.

Нужно сделать следующее: перед перерисовкой "сдвинуть scroll bars", то есть физически поместить эту ячейку в видимое пространство.

Может кто сталкивался - Как ?
Спасибо


Андрей Сенченко   (2002-03-25 13:27:00) [1]

OK. Спасибо :)


Юрий Зотов   (2002-03-25 13:23:00) [2]

Cм. свойства TopRow и LeftCol - их надо вычислить так, чтобы нужная ячейка стала видимой.

Могут пригодиться еще и VisibleColCount, VisibleRowCount.


Alx2   (2002-03-25 13:19:00) [3]

StGrid.Work.Row := Номер строки, которую делаем видимой


Наверх

Титульная страница Поиск, карта сайта Написать письмо