Показать сообщение отдельно
  #8  
Старый 20.12.2011, 01:31
Аватар для YVitaliy
YVitaliy YVitaliy вне форума
Местный
 
Регистрация: 14.12.2011
Сообщения: 481
Версия Delphi: Borland Delphi7
Репутация: 17
По умолчанию

Все дело в ShowModal - после вызова окна из текущей проседуры уже не можешь изменить поля. Изменяй поля перед вызовом формы или используй метод Show, хотя не рекомендую.
вот проверь
Код:
B:=TStroka.Create(self.Stolbec);
SS:=TForm4.Create(Application,self);
SS.caption:=('Äîáàâèòü ó÷àñòîê');
ss.Memo1.Lines.Add('aa');
SS.ShowModal;
ss.Memo1.Lines.Add('bb');
if A then self.Add;
self.Masiv[Read_All_Strok].Stroka[1]:=B.Read_Cell(1);
self.Masiv[Read_All_Strok].Stroka[2]:=B.Read_Cell(2);
A:=true;
B.Free;
Строка 'bb' не добавится, а 'aa'-добавилась
Ответить с цитированием