5,388
社区成员
发帖
与我相关
我的任务
分享
var
myform:tformclass;
aform:tform;
begin
myform:=TFormClass(TForm(Application.FindComponent('Form_Apply_Money_To_OA')));
aform:=TForm(myform);
aform:=myform.Create(nil);
try
aform.ShowModal;
finally
aform.Free;
end;