摘自Hubdog的小窝。
http://hubdog.csdn.net/UpdateList/ul20030206.htm
发布部署
前面我们提到了,调试时尽量选择Stand Alone 模式,发布时选用ISAPI方式发布,那么如何将Stand Alone的程序改成ISAPI的程序呢?
非常简单,只要将我们hr.dpr中program 改成Library,将IWInitStandAlone改成 IWInitISAPI就可以了。
program HR;
{PUBDIST}
uses
IWInitStandAlone,
ServerController in 'ServerController.pas' {IWServerController: TDataModule},
CHR in 'CHR.pas' {formMain: TIWForm1},
DatamoduleUnit in 'DatamoduleUnit.pas' {dmHR: TDataModule},
CFrameMenu in 'CFrameMenu.pas' {FrameMenu: TFrame},
CFormBase in 'CFormBase.pas' {formBase: TIWAppForm},
CFormCorpList in 'CFormCorpList.pas' {formCorpList: TIWAppForm},
CFormHumanList in 'CFormHumanList.pas' {formHumanList: TIWAppForm},
CFormQuery in 'CFormQuery.pas' {formQuery: TIWAppForm},
CFormRight in 'CFormRight.pas' {formRight: TIWAppForm},
CFormEditCorp in 'CFormEditCorp.pas' {formEditCorp: TIWAppForm},
CWebUtils in 'CWebUtils.pas',
CFormEditHuman in 'CFormEditHuman.pas' {formEditHuman: TIWAppForm},
CFormLogin in 'CFormLogin.pas' {formLogin: TIWAppForm};
{$R *.res}
begin
IWRun(TformLogin, TIWServerController);
end.