怎樣獲得調用的FORM名

Question

我有很多form同時調用另一個form1
在form1運行時
怎樣知道form1是由哪個form調用的?
請問代碼怎樣寫?

Answer 1

调用前给form1.tag一个数字，而form的具体名字你自己可以知道

Answer 2

我使用动态创建窗体的方式实现，可以通过窗体的OWNER来识别调用者。
        form2:TForm2;
        form2 := TForm2.Create(Form1);
        ShowMessage(form2.Owner.ClassName());
        try 
                form2->ShowModal();
        
        finally 
                form2.free;