Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


Alex_C ©   (2013-03-20 16:48:00) 

Создаем новое приложение (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; - все нормально, курсор в последней позиции.


Alex_C   (2013-03-20 17:56:00) [1]

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


O'ShinW   (2013-03-20 17:49:00) [2]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо