On Sat, 24 Mar 2012, leledumbo wrote:
I want to do something like this: A base module (call it ModLayout) writes a header, then a descendant module (say Mod1, Mod2 and so on) writes the inner content, ended by ModLayout writes the footer. With this scenario, the header and footer don't need to be written for each Mod1, Mod2 and so on, just once in ModLayout. However, there seems to be no BeforeResponse event that could do the header writing. There's only AfterRequest and in that event, there's no TResponse object passed. I could put the header writing in ModLayout's OnRequest and explicitly call inherited in each Mod1, Mod2 and so on's OnRequest, but it looks dirty and error prone (one could forget to do that easily).
I would do this differently. Implement the OnRequest in ModLayout, where a virtual 'GetContent' is defined that tries the webactions. The descendants either implement webactions, or override getcontent. Michael. _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
