使用VCL作为Web(intraweb)作为向传统非分层(2层)Delphi win32应用程序添加Web界面的技巧确实有意义吗？

Question

我的团队正在维护一个巨大的Client Server win32 Delphi应用程序.它是一个客户端/服务器应用程序(胖客户端),它使用DevArt(SDAC)组件连接到SQL Server.

业务逻辑经常"被困"在Component的事件处理程序中,无论如何,通过一定程度的重构,可以将业务逻辑移动到公共单元中(这项工作的很大一部分已经在重构期间完成了......维护遗留应用程序的人别写的非常令人沮丧,但这是一项非常普遍的工作).

现在有一个Web界面的请求,当然我有几个选项,在这个问题中我想关注VCL for web(intraweb)选项.

我们的想法是为客户端/服务器应用程序和Web应用程序使用公共代码(相同的pas文件).我听说很多人将遗留应用程序从delphi迁移到intraweb,但在这里我也试图保留Thick客户端.

这个想法是使用通用代码,可能会用一些编译器指令来编写特定的代码:

{$IFDEF CLIENTSERVER}
  {here goes the thick client specific code}
{$ELSE}
  {here goes the Intraweb specific code}
{$ENDIF}

然后另一个问题是"迁移计划",假设我有300个功能,在第一个版本中,我将只在Web应用程序中提供50个.如何跟踪它？我在想(ab)使用Delphi接口来处理这个问题.例如,对于用户身份验证,我可以在过程中移动所有相关代码并声明如下界面:

type
  IUserAuthentication= interface['{0D57624C-CDDE-458B-A36C-436AE465B477}']
    procedure UserAuthentication;
  end;

通过这种方式,当我在两个应用程序(胖客户端和Intraweb)中实现IUserAuthentication接口时,我知道该功能已被"移植"到Web上.无论如何,我不知道这种方法是否有意义.我制作了一个原型来模拟整个过程.它适用于"Hello world"应用程序,但我想知道它是否对大型应用程序有意义,或者这种接口的想法只会适得其反并且会适得其反.

我的问题是:这种方法有意义吗？(接口的想法只是一个额外的想法,它不像上面描述的通用代码部分那么重要)它是一个可行的选择吗？

据我所知,这取决于很多类型的应用程序,无论如何我是CRM/Accounting域中的通用,并且单个安装上的并发用户数通常小于20,峰值为50.

额外评论(更新):我问这个问题是因为我没有n层应用程序,所以我认为Intraweb是拥有一个与胖客户端有共同代码的Web应用程序的唯一选择.在我的特定情况下,从Delphi代码开发Web服务是没有意义的,所以我可以选择使用ASP.NET编写Web界面(复制业务逻辑),但在这种情况下我无法利用公共代码.简单的方法.是的我可以使用dll,但我的代码不适合.

Answer 1

你必须要记住的最重要的事情是:

• 您的胖客户端.EXE进程一次由一个人使用(多个人将具有该.EXE的多个实例).
• 您的intraweb .EXE进程将被许多人一次使用.它们都共享相同的流程实例.

这意味着您的业务逻辑不仅必须重构为公共单元,业务逻辑的实例必须能够多次驻留在内存中,而不是干扰.

这从与数据库对话的业务逻辑开始:您必须能够同时拥有多个数据库连接(实际上,数据库连接池最有效).

根据我的经验,当您可以将业务逻辑重构为数据模块时,您有一个很好的起点来支持应用程序的Intraweb和胖客户端版本.

你不应该忘记用户界面:

• 胖客户端支持模态表单,并具有更丰富的UI
• Web浏览器仅支持消息对话框(然后:那些非常有限),所有花哨的UI内容都需要大量的开发时间(例如,TMS有一些很好的Intraweb组件)

然后,最重要的是,您必须应对HTTP协议的无状态特性.为了克服这个问题,你需要会议.Intraweb将负责会话的大部分内容.
但你需要问自己这样的问题:

• 如果用户闲置XX分钟会发生什么？
• 我可以在内存中存储多少会话状态？如果它不适合怎么办？
• 如何处理不适合内存的会话状态？

这只是一个开始,所以当你需要更多信息时,请使用.
如果它非常适合您的应用,您可以随时直接与我联系:只是谷歌我.

--jeroen