- 博客(2)
- 收藏
- 关注
转载 /////////////////////通用子窗体开关
/////////////////////通用子窗体开关procedure OpenForm(FormClass: TFormClass; var AForm; AOwner:TComponent=nil);var i: integer; Child:TForm;begin for i := 0 to Screen.FormCount -1 do if Screen.Forms
2004-08-31 15:21:00 674
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人