How to inherit from a Servermodule in Datasnap with Delphi XE3

Asked

Viewed 405 times

2

I am migrating a Server application with Dcom protocol and Borland Socket Sever in Delphi 2006 to Datasnap in the Delphi XE3, but in the new version of Datasnap I am not managing to inherit a ServerModule.

In the visual part, the ServerModule looks like vcl form, when I pass an inheritance instead of a TDSServerModule.

Example:

"TSMTeste = class(TSMHerança)" 
  • 2

    But what happens? I couldn’t understand your question...

  • The components and routines that are in the "Tdsservermodule Pai" are not available / accessed by the "Tdsservermodule Filho" that inherits from the "Tdsservermodule Pai", in addition the visual part appears as a form instead of the module.

  • I think I get it. You have a "template" TDS and a "son" TDS, is that it? If it is, I think you should use Published in place of public. Take a look at this link

  • Worth @Edgarmunizberlinck for attention but it would not be this, the problem is example: in Servermodule Father use the following form 'Tsmpai = class(Tdsservermodule)' in Servermodule Son step inheriting from Father 'Tsmfilho = class(Tsmpai)', plus the visual part '.dfm' becomes a Form instead of a Module..

  • @Leobjr As it is already solved, mark your answer as correct so that it can be taken off the unanswered question list, perhaps by adjusting the title to help people who have gone through a similar problem

1 answer

0


Solved,

The problem was in . dpr and . dproj, had to change the nomenclature from Tremotedatamodule to Tdsservermodule. Ai it was possible to inherit a Servermodule.

Thank you all,

Browser other questions tagged

You are not signed in. Login or sign up in order to post.