摘要: procedure TFrmMain.btnUpdateFilesClick(Sender: TObject);begin try if Assigned(gEXEmm) then FreeAndNil(gEXEmm); if Assigned(gINImm) then FreeAndNil(gIN 阅读全文
posted @ 2012-12-29 22:24 delphi中间件 阅读(793) 评论(0) 推荐(0) 编辑