Запрет на редактирование определенных ячеек в stringgrid

@shtrayb · Регистрация: 24.12.2014

Author24 — интернет-сервис помощи студентам

Делаю игру судоку, используя StringGrid. Ячейки заполняются из файла, т.е. определенные заполнены цифрами, другие же пробелами. Нужно запретить редактировать ячейки с цифрами, но не те которые были с пробелами и были изменены на цифры. Уже два дня мучаюсь, так и не могу додуматься. Это вообще возможно? Помучился и с onEditText и onSetText, SelectCell, но во едино не связывается у меня в голове. Помогите пожалуйста. Может какие мысли есть?

@NIKOLAYY · 24.12.2014, 13:38

Сообщение от shtrayb

Нужно запретить редактировать ячейки с цифрами

Делай глобальную строковую переменную, и на одно из событий такие как онклик, онкейпрес, онкейдаун запиши в переменную значение из ячейки, затем одай в нее обратно на онкейап.

Delphi

1 2	s:= StringGrid1.Cells[i,j]; //записать в ячейку StringGrid1.Cells[i,j]:= s; //отдать в ячейку

Номер строки и колонки получай в переменные и тогда код знать будет с какой ячейкой работать.

Сообщение от shtrayb

Нужно запретить редактировать ячейки с цифрами

Напиши условие на этот запрет.

Сообщение от shtrayb

Нужно запретить редактировать ячейки с цифрами, но не те которые были с пробелами и были изменены на цифры

А это уже сложнее. Как твоя функция или код будет знать что ячейка редактируется уже два раза? Да ни как небудет, поэтому нужно сделать так чтоб она как то узнала, например массив создать равный таблице и вставлять я ячейку массива букву р например что соответствует ячейке в стринггриде и обозначает р - редактировалась значит.
А дальше все просто, проверяй есть ли в массиве буква р по местоположению равная редактируемой ячейки таблицы и отталкивайся от этого.

@Vabos · 24.12.2014, 13:54

Можно, например, запретить выбирать определенные ячейки:
procedure StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean);

@mss · 24.12.2014, 14:03

при получениии ячейкой фокуса:

Код

if <условие возможности редактирования сфокусированной ячейки> then
  Grid.Options := Grid.Options + [goEditing]
else
  Grid.Options := Grid.Options - [goEditing]

@NIKOLAYY · 25.12.2014, 01:36

Сообщение от shtrayb

Может какие мысли есть?

Вот еще держи в довесок, оказывается у таблицы есть еще свои свойства и события которые которые запоминают ранее редактировавшуюся ячейку и ее значение, тогда можно обойтись и без массива для запоминания этих свойств.

Маска описывается в параметре Value, а правила
ее описания полностью соответствуют маске класса TMaskEdit.

Delphi

1
2
3

property OnGetEditMask: TGetEditEvent;
type TGetEditEvent = procedure (Sender: TObject; ACol,
ARow: Longint; var Value: string) of object;

При редактировании текст, ранее находящийся в ячейке, заносится в пара-
метр Value.
property OnGetEditText: TGetEditEvent;
По окончании редактирования содержимого ячейки вызывается событие:

Delphi

1
2
3

property OnSetEditText: TSetEditEvent;
type TSetEditEvent = procedure (Sender: TObject; ACol,
ARow: Longint; const Value: string) of object;

На этом этапе вполне можно наложить дополнительные ограничения на вво-
димые данные или, например, преобразовать их.

@northener · 25.12.2014, 02:20

if <условие возможности редактирования сфокусированной ячейки> then

Плюс к почти идеальному совету mss

добавлю что само это условие прекрасно можно хранить в "самой ячейке TSringGrid". А точнее в свойстве Objects.

Добавлено через 3 минуты

Сообщение от NIKOLAYY

Вот еще держи в довесок, оказывается у таблицы есть еще свои свойства и события которые которые запоминают ранее редактировавшуюся ячейку и ее значение, тогда можно обойтись и без массива для запоминания этих свойств.

Каких только монстров не рождали "свежие" мозги новичков!

Не прими в личную обиду, пож-ста.

@mss · 25.12.2014, 08:14

Не по теме:

А точнее в свойстве Objects

Ну тоже будет нелишняя ложка к столу)

@shtrayb 0 / 0 / 0 Регистрация: 24.12.2014 Сообщений: 1
		1
	Запрет на редактирование определенных ячеек в stringgrid 24.12.2014, 12:44. Показов 7961. Ответов 6 Метки нет (Все метки) Делаю игру судоку, используя StringGrid. Ячейки заполняются из файла, т.е. определенные заполнены цифрами, другие же пробелами. Нужно запретить редактировать ячейки с цифрами, но не те которые были с пробелами и были изменены на цифры. Уже два дня мучаюсь, так и не могу додуматься. Это вообще возможно? Помучился и с onEditText и onSetText, SelectCell, но во едино не связывается у меня в голове. Помогите пожалуйста. Может какие мысли есть? Миниатюры 0

@Vabos 132 / 129 / 31 Регистрация: 12.12.2011 Сообщений: 462
	24.12.2014, 13:54	3
	Можно, например, запретить выбирать определенные ячейки: procedure StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean); 1

@northener пофигист широкого профиля 4732 / 3167 / 858 Регистрация: 15.07.2013 Сообщений: 18,248
	25.12.2014, 02:20	6
	if <условие возможности редактирования сфокусированной ячейки> then Плюс к почти идеальному совету mss добавлю что само это условие прекрасно можно хранить в "самой ячейке TSringGrid". А точнее в свойстве Objects. Добавлено через 3 минуты Сообщение от NIKOLAYY Вот еще держи в довесок, оказывается у таблицы есть еще свои свойства и события которые которые запоминают ранее редактировавшуюся ячейку и ее значение, тогда можно обойтись и без массива для запоминания этих свойств. Каких только монстров не рождали "свежие" мозги новичков! Не прими в личную обиду, пож-ста. 0

@mss
	25.12.2014, 08:14 Запрет на редактирование определенных ячеек в stringgrid #7
	Не по теме: А точнее в свойстве Objects Ну тоже будет нелишняя ложка к столу) 0

Опции темы