Хотите раскрутить свой сайт в Яндекс и Google?
Недорогое и качественное продвижение сайта от 50$

Delphi 1

Ошибка Grid RangeSel+RowSel

Тема: Ошибка Grid RangeSel+RowSel
От: Bill Goelkel 71725,455
К: Все

Компонент: TStringGrid, TDrawGrid

Проблема: Если в свойстве Options goRangeSelect и goRowSelect имеют True, то не выбирается диапазон, состоящий из последовательных строк. Вместо этого выделяются множетсво разрозненных строк.

Решение: В исходных файлах VCL, строка 2,310 файла GRIDS.PAS:
procedure TCustomGrid.MoveAnchor, измените FAnchor.Y на FAnchor.X,
теперь это должно выглядеть так:

if goRowSelect in Options then FAnchor.X := ColCount-1;

- Bill Goelkel [000781]

Материалы, которые находятся на этой страничке, любезно предоставлены Игорем Ивановым

РЕКЛАМНЫЙ БЛОК