Форум: "Основная";
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];
ВнизMDI - получение ссылки на конкретное дочернее окно (inside). Найти похожие ветки
← →
Владислав (2002-03-12 14:32) [5]А так не проще?
type
TForm2 = class(TForm)
...
private
...
ChartForm: TForm3;
...
end;
...
procedure TForm2.CreateGraph(const Name: string);
begin
{ create graph window }
ChartForm := TForm3.Create(Application);
ChartForm.Caption := Name;
Draw();
end;
А в Draw():
procedure TForm2.Draw;
begin
with ChartForm do
begin
//Do something
end
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c