自定义组件动态调用窗体的问题?

Question

我自定义了一个组件,这个组件是带窗体的,在这个窗体上有一个"查询"按钮,点击这个按钮会弹出不同的查询窗体,具体是哪一个查询窗体在我的自定义组件中有一个属性"FindFormName"进行设置,在组件中动态创建这个查询窗体,查询窗体关闭后会返回一个TList类型的值,在组件中要用到这个值,请问我怎么样能取到这个值呢?

Answer 1

FindFormName 为String类型的一个属性   TFrmBaseFind(FindFormName) := TFrmBaseFind(GetClass(FindFormName)).Create(Application);
   Try
     TFrmBaseFind(FindFormName).ShowModal;
   Finally
     TForm(FindFormName).Free;
   End;
通过这段代码动态创建查询窗体,现在要做的是在查询窗体关闭后要取到他的一个值,请问怎么取呢?

Answer 2

FindFormName 为String类型的一个属性   TFrmBaseFind(FindFormName) := TFrmBaseFind(GetClass(FindFormName)).Create(Application);
   Try
     TFrmBaseFind(FindFormName).ShowModal;
   Finally
     TForm(FindFormName).Free;
   End;
通过这段代码动态创建查询窗体,现在要做的是在查询窗体关闭后要取到他的一个值,请问怎么取呢?

Answer 3

FindFormName 为String类型的一个属性   TFrmBaseFind(FindFormName) := TFrmBaseFind(GetClass(FindFormName)).Create(Application);
   Try
     TFrmBaseFind(FindFormName).ShowModal;
   Finally
     TForm(FindFormName).Free;
   End;
通过这段代码动态创建查询窗体,现在要做的是在查询窗体关闭后要取到他的一个值,请问怎么取呢?