在工程中写代码,如:
flashform = Tflashform.create(application);
flashform.show;
flashform.update;
application.createform(tmainform, mainform);
application.createform(tloginform, loginform);
application.createform(totherform, otherform);
flashform.close;
flashform.free;
application.run