5,928
社区成员




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;