Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как определить из какой формы было вызвано текущее окно? [D3, Win95/98]

Alexei_III © (2002-04-19 13:29:00)

Alexei_III (2002-04-19 15:03:00) [1]
Решение найдено. Спасибо всем. (воспользовался решением от Alx2)

arhelon (2002-04-19 14:37:00) [2]
TForm(Owner).Name = форме которая вызвала

KSergey (2002-04-19 14:22:00) [3]
Создаваемая форма, как я надеюсь, динамически содается? если да - то проще всего, на мой взгляд, Owned"ом задать ту форму, которая создала - и тогда это свойство можно почитать внутри создаваемой формы.

Shaman_Naydak (2002-04-19 14:16:00) [4]
У Screen"a есть Event OnForm Change.. Вот примерчик:

type
TForm1 = class(TForm)
procedure FormChange(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
OldForm: TForm;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}

procedure TForm1.FormChange(Sender: TObject);
begin
if OldForm <> nil then
Screen.ActiveForm.Caption:=OldForm.Name;
OldForm:=Screen.ActiveForm;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.OnActiveFormChange:=FormChange;
end;

Alx2 (2002-04-19 13:56:00) [5]
У окна (если это форма) есть св-во tag. Перед вызовом его в этот tag можно занести номер вызывающей формы из нее же самой.

Wik (2002-04-19 13:38:00) [6]
Можно при вызове окна передавать параметр - имя вызывающего окна

Alexei_III (2002-04-19 13:37:00) [7]
У меня есть форма, которая может вызываться из двух других форм. Так вот вопрос, орпедлить какая из них вызвала эту самую форму?

Игорь Шевченко (2002-04-19 13:31:00) [8]
День добрый,

В общем случае никак.

С уважением,

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »