TEdit+TStringGrid=странное поведение

← →
Alex_C (2013-03-20 16:48) [0]

Создаем новое приложение (Delphi 2007)
Создаем в нем 2 формы:
на первую кладем TEdit, на вторую TStringGrid. Для стринггрида прописываем (принципиально, иначе все работает!) FixedCols = 0, FixedRows = 0. Для TEdit прописываем
procedure TForm1.Edit1Change(Sender: TObject); begin Form2.StringGrid1.Cells[0, 0] := Edit1.Text; end;
Запускаем и набираем текст в TEdit. Получаем странный глюк: курсор TEdit все время стоит в первой позиции. Вернее он буде возвращается после операции Form2.StringGrid1.Cells[0, 0] := Edit1.Text;
При присвоении значения допустим Form2.StringGrid1.Cells[0, 1] := Edit1.Text; - все нормально, курсор в последней позиции.

← →
O'ShinW © (2013-03-20 17:49) [1]

D7, глюк не повторяется

← →
Alex_C (2013-03-20 17:56) [2]

В добавление к выше написанному - такая ерунда происходит при вставки в выделенную ячейку стринггрит. Т.е. если мышкой выделить ячейку 1,1 , то при попытке сделать
Form2.StringGrid1.Cells[1, 1] := Edit1.Text;
Курсор тоже теряется.
В любые другие ячейки вставляю - без проблем!
Неужели это конкретно у D2007 глюк?

TEdit+TStringGrid=странное поведение Найти похожие ветки