Не обновляется текст в Edit

[Vanta11a]

Код, подобный этому:

Form2.Edit1.Text := 'ErrorString';

меняет содержимое поля Text, но на форме это не отображается (визуально остается старое содержимое).
Аналогично для поля "Caption" Label`a, что бы я не присваивал - визуально остается тот текст, что был при инициализации формы.

Гугль молчит про такую багу. ЧЯДНТ?

[Аватар]

Скорее всего до этой команды дело не доходит. В отладчике посмотрите. Да и код показать не мешало бы

[Vanta11a]

В том-то и проблема, что отладчик изменение свойства показывает (breakpoint после выполнения команды срабатывает). А в GUI нет ничего.
Может я с созданием формы косячу?
Объявление глобально в var + при нажатии кнопки следующий код:

Form2 := TForm2.Create(Application);
Form2.ShowModal;

[Lardes]

Убери

Form2 := TForm2.Create(Application);

если у тебя форма не создается динамически.

Попробуй таким образом:

Form2.Edit1.Text := 'ErrorString';
Form2.ShowModal;

[eval]

мало кода .

[Vanta11a]

В свойствах проекта

Application.CreateForm(TForm2, Form2);

В глобальном var

Form2 : TForm2

В обработчике кнопки:

procedure TForm1.ButtonClick(Sender: TObject);
begin
Form2 := TForm2.Create(Application);
Form2.ShowModal;
end;

Дальше работа в Form2, обработчик кнопки:

procedure TForm2.ButtonClick(Sender: TObject);
begin
Form2.Edit1.Text := 'ErrorString';
Form2.Edit1.Text := 'ErrorString'; //тут стоит breakpoint
end;

Я что-то упустил?

Убери

Падает с ошибкой чтения.

[Аватар]

Падает с ошибкой чтения.

Не должно, если ранее не было Form2.Free
Проект пересобрать не пробовали? Возможно баг в проекте

[Lardes]

В свойствах проекта оставляешь все как есть, в остальном случае:

procedure TForm1.ButtonClick(Sender: TObject);
begin
  Form2.Edit1.Text := 'ErrorString';
  Form2.ShowModal;
end;

[Vanta11a]

Не должно, если ранее не было Form2.Free

Не было.

Проект пересобрать не пробовали? Возможно баг в проекте

Пробовал. Может есть что-то в духе Clean (c++ builder)?
Lardes
Проблема в том, что данные не обновляются из второй формы (первая её только вызывает). Процедура срабатывает, поле меняется, а в GUI обновления нет.

[eval]

procedure TForm2.ButtonClick(Sender: TObject);
begin
Edit1.Text := 'ErrorString';
Edit1.Text := 'ErrorString';
end;