Форум: "Основная";
Текущий архив: 2003.10.09;
Скачать: [xml.tar.bz2];
ВнизMDi и Child Найти похожие ветки
← →
Andrey Voznesenskiy (2003-09-27 13:27) [0]Ув.отцы помогите дядьке!!!
Вопрос: создаю много MDIchild-форм(TForm2) и по нажатию кнопки на MDIForm надо добавить на Form2 текст в Memo. Причем самое главное, добавить на !!!АКТИВНУЮ!!! MDIChild-форму
(т.е. например некоторые MDIChildы уже закрыты или минимизированы)
На MDI форме 2 кнопки:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
Application.CreateForm(TForm2, Form2); // созд.child формы
end;
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
{например}
form2.memo1.lines.add("hey lamo");// на Child-форме доб.в memo слово
end;
← →
PVOzerski (2003-09-27 13:36) [1]property ActiveMDIChild: TForm
А если у тебя tForm2 - класс Child-окон в tForm1, то как Form2 из них значиться будет лишь одно окно - в лучшем, а точнее - в худщем случае, потому как здесь больше похоже на то, что Child-окна надо создавать at Run Time как tForm2.Create(Form1)...
Короче,
procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
{например}
(ActiveMDIChild as tForm2).memo1.lines.add("hey lamo");// на Child-форме доб.в memo слово
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.10.09;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.009 c