Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c
14-27639
kopcap
2003-09-19 18:09
2003.10.09
Люди посоветуйте прогу для создания анимированных *.gif


14-27700
hawkins
2003-09-22 06:48
2003.10.09
почему у меня в Delphi6 в help-е предметный указатель пустой?


3-27386
The X
2003-09-18 15:23
2003.10.09
Пропадания записей в Paradox 7


3-27345
Sliften1
2003-09-12 23:28
2003.10.09
Смена кодировки таблиц


3-27336
Manfred
2003-09-20 19:07
2003.10.09
List index out of bounds.




   Наверх