| kamerer |
| Отправлено: 22.05.2006, 21:14 |
|
Ученик-кочегар
Группа: Участник
Сообщений: 6
|
Собственно весь вопрос в теме. Горизонтальный ScrollBar убирается автоматически. вертикальный не убирается вообще. Свойств у этих компонентов нет. Может все же есть какие нибуть способы его убрать? А то сильно мешает. Из за него не обрабатывается событие OnCellClick(если переходишь между записями при помощи скролбара) |
|
| AVC |
| Отправлено: 23.05.2006, 08:16 |
|
Ветеран
Группа: Модератор
Сообщений: 1583
|
Вообще-то переход между записями удобнее ловить событием
TDataSource::OnDataChange при Field == NULL,
а OnCellClick предназначен для другого.
ShowScrollBar(DBGrid->Handle, SB_VERT, false);
Но имейте ввиду, что при некоторых событиях грид сам его восстанавливает.
Все вместе
| CODE |
void __fastcall TForm1::DataSourceDataChange(TObject *Sender, TField *Field)
{
if (!Field)
{
// ShowScrollBar(DBGrid3->Handle, SB_VERT, false);
// ShowScrollBar(DBGrid3->Handle, SB_HORZ, false);
ShowScrollBar(DBGrid3->Handle, SB_BOTH, false);
}
}
|
Отредактировано AVC — 23/05/2006, 07:57 |
|
| kamerer |
| Отправлено: 23.05.2006, 23:45 |
|
Ученик-кочегар
Группа: Участник
Сообщений: 6
|
Спасибо огромное. Все замечательно работает :-) |
|
