Страница 2 из 2
Code: |
uses Unit2; //ссылка на модуль MDIChild формы
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject); var vv:TForm2; begin vv:=TForm2.Create(Application); //... Здесь форма не видна vv.Memo1.Lines.Add('123123'); //Типо что-то заполняем на MDIChild форме Caption:='2'; Sleep(2000); Caption:='0'; //.. Здесь форма до сих пор не видна vv.Show; end; |
Автор: Girder
- << Назад
- Вперёд
Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.
ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!