[luffi]

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

[Snake22]

объяви глобальную переменную.и потом у стринггрида в событии
OnSelectCell запомни текст выделенной ячейки, а в событии OnsetEditText проверяй,если текущее значение отличается,значит изменилось.
Acol,ARow тебе в помощь

[luffi]

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

объяви глобальную переменную.и потом у стринггрида в событии
OnSelectCell запомни текст выделенной ячейки, а в событии OnsetEditText проверяй,если текущее значение отличается,значит изменилось.
Acol,ARow тебе в помощь

я зделат вот так, но мне каждый раз когда я ввожу даные выбивает уведомление

Код:

for i:=0 to StringGrid11.RowCount do
  for j:=0 to StringGrid11.ColCount do
    if StringGrid11.Cells[i,j]<>Form2.StringGrid1.Cells[i,j] then ShowMessage('');

[angvelem]

Код:

  if StringGrid11.Cells[i,j]<>Form2.StringGrid1.Cells[i,j]

Левая половина не относится к Form2?

[cotseec]

похоже, что не относится...
видимо ТС сделал копию таблицы, разместив ее на другой форме...а вот изменение копии, при изменении оригинала (после оповещения об этом) не проводит

[luffi]

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

похоже, что не относится...
видимо ТС сделал копию таблицы, разместив ее на другой форме...а вот изменение копии, при изменении оригинала (после оповещения об этом) не проводит

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

[NumLock]

у TStringGrid событие OnSetEditText:

Код:

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

OnSelectCell:

Код:

  TSelectCellEvent = procedure (Sender: TObject; ACol, ARow: Longint;
    var CanSelect: Boolean) of object;
property OnSelectCell: TSelectCellEvent