Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.09;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.019 c
1-27565
Dark Elf
2003-09-30 15:40
2003.10.09
Изменение курсора


1-27572
User_OKA
2003-09-29 15:00
2003.10.09
TreeView


1-27589
denmin
2003-09-29 10:51
2003.10.09
Помогите с установкой Delphi5 в


3-27364
Coder_
2003-09-19 12:23
2003.10.09
Проблема с запрос ом


1-27543
Nastya
2003-09-30 16:18
2003.10.09
Как поставить полосу прокрутки TScrollBox-а в верхнее положение?