Форум: "Основная";
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];
ВнизКак связать объекты? Найти похожие ветки
← →
_Mike_ (2002-03-14 14:15) [6]При создании "главного" объекта указывать владельцем form1,
а при создании "другого" - "главный" объект. Тогда при закрытии
формы все объекты корректно удалятся. Другой обращается к главному так:
(owner as tMain).left
а наоборот так:
(controls[0] as tOther).left
Например, вот так:
PROCEDURE tForm1.FormCreate(sender: tObject);
BEGIN
// создадим "главный" объект
main:=tMain.Create(form1);
WITH main DO BEGIN
left:=8;
top:=8;
//...
END;
// создадим "другой" объект
other:=tOther.Create(main);
WITH other DO BEGIN
left:=8;
top:=8;
//...
END;
END;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.006 c