Страница 1 из 1

StringGrid ограничение ввода

Добавлено: 06 ноя 2006, 16:14
samurayka
пожалуйста выручайте....я только учусь, а мне надо уже штуку одну сделать...задание было такое: используя stringgrid вычислить всякие там экономические показатели...в 1-й столбец вводишь числа, во 2-м расчеты и т.д. через один...все нормально, но надо сделать так, чтобы в каждый 2-й столбец (где расчитывается) нельзя было вводить ничего...я нигде не могу этого найти.. :(

Добавлено: 06 ноя 2006, 20:48
Duncon
Установка атрибута Только для чтения у столбцов компонента StringGrid
Юзать можно к примеру в обработчике события OnSelectCell

Код: Выделить всё

if Col mod 2 = 0 then
  grd.Options := grd.Options + [goEditing]
else
  grd.Options := grd.Options - [goEditing];

Добавлено: 07 ноя 2006, 11:06
Игорь Акопян
можно использовать метод OnSelectCell

Код: Выделить всё

procedure TForm1.StringGrid1SelectCell(Sender: TObject; Col, Row: Longint; var CanSelect: Boolean);
begin
  CanSelect := (Col mod 2) <> 0;
end;
тогда юзер просто не сможет выделить эту ячейку