Как определить какая процедура вызвала открытие формы?

← →
igor_buz (2005-01-19 15:12) [0]

Уважаемые! Как определить какая процедура (точнее какой обьект)вызвала открытие второй формы в приложении, дабы определить ее (второй формы) дальнейшее поведение?

← →
Плохиш © (2005-01-19 15:15) [1]

Сказать ей об этом

← →
igor_buz (2005-01-19 15:22) [2]

Это понятно. Вопрос, как сделать это по правильному? :)

← →
Плохиш © (2005-01-19 15:28) [3]

"Сим-сим, откройся, я - igor_buz"

← →
Amoeba © (2005-01-19 15:29) [4]

Например, устанавливай у этой второй формы нужное тебе значение св-ва Tag

← →
igor_buz (2005-01-19 15:33) [5]

Про Tag уже думал, как-то не очень красиво. Но Можно.
А Плохиш похоже знает толк, да продолжает говорить загадками. :)

← →
Amoeba © (2005-01-19 15:47) [6]

> Про Tag уже думал, как-то не очень красиво.

Чего ж тут некрасивого? Простое и эффективное решение не может быть некрасивым.

← →
igor_buz (2005-01-19 15:51) [7]

Наверное так оно и есть. Убедили. Я просто думал, что есть какое-то другое "типа правильное" решение.
Если никому больше ничего добавить нет, на сем откланяюсь.
Огромное спасибо!

← →
begin...end © (2005-01-19 15:59) [8]

> [7] igor_buz (19.01.05 15:51)

Добавлю просто, что в Tag можно хранить не только целочисленное значение, но и ссылку на объект.

← →
Digitman © (2005-01-19 15:59) [9]

> открытие второй формы

что понимать под "открытием" ? создание ? визуализацию ? создание+визуализацию ?

от этого зависит простота и универсальность решения задачи

← →
Плохиш © (2005-01-19 16:09) [10]

>Digitman © (19.01.05 15:59) [9]

Во-во

← →
WondeRu © (2005-01-19 16:11) [11]

sender еще никто не отменял!

← →
Digitman © (2005-01-19 16:17) [12]

> WondeRu

ты о событиях формы ? ну и к какому боку присобачить этот sender ? этот параметр указывает, какой конкретно объект возбудил событие, а не какой объект обратился к объекту, возбудившему событие

По нормальному, необходимо завести параметр перечислимого типа.
Хотя если совсем по нормальному, то можно написать несколько потомков базовой формы, ведущих себя по разному, и создавать сразу требуемый класс.

Digitman © (19.01.05 16:17) [12]

просто указываем при создании второй формы

Form2 := TForm2.Create(MyObject) or Form2 := TForm2.Create(Pointer(IntegerBehaviorValue));

а там уже анализируем в конструкторе формы

if Sender is TMyObject1 then or if Integer(Sender) = 232 then

> угу, а работать-то все-равно будет (надеюсь)!

угу, что шайка что веник - все равно в бане пригодятся (надеюсь)

← →
igor_buz (2005-01-19 21:14) [18]

> Digitman
> что понимать под "открытием" ? создание ? визуализацию ?
> создание+визуализацию ?
вообще интересует при визуализации..

Как определить какая процедура вызвала открытие формы? Найти похожие ветки