Re: WebTier returning RTF instead of PDF?

rbuser

Hi,

modify

now we have implemented that feature. Seems to work. :-)
(apart from RTF layout problems ...)

The next problem is, that we dont have any source code
for unit "rsWebViewerStyle" to control "TrsWebViewerStyle".

Are we missing something?


TIA,
Joachim Engel.

nardmoseley

The example that I constructed contains all of the source code that is
required to create a new toolbar button on the viewer and add a new format.

A WebViewerStyle contains a FrameSetClass, PageFrameClass, and
NavFrameClass. The way that you define a new style is to define a new
NavFrameClass. This code is included the example that I posted. The
myWebViewerFrameNav.pas unit contains a custom NavFrameClass that is used to
define the myWebViewerStyle.

The source to TrsWebViewerStyle, I have posted below.

If you let me know what you are trying to accomplish, I can suggest an
approach.





{---------------------------------------------------------------------------
---}
@{@TrsWebViewerStyle.Create }

constructor TrsWebViewerStyle.Create;
begin

inherited Create;

FToolbarOptions := cAllWebViewerToolbarOptions;

FramesetClass := TrsWebViewerFrameset;
NavFrameClass := TrsWebViewerFrameNav;
PageFrameClass := TrsWebViewerFramePage;

end;

{---------------------------------------------------------------------------
---}
@{@TrsWebViewerStyle.StyleName }

class function TrsWebViewerStyle.StyleName;
begin

Result := 'WebViewer';

end;


initialization
TrsXHTMLStyleManager.RegisterStyle(TrsWebViewerStyle);

finalization
TrsXHTMLStyleManager.UnregisterStyle(TrsWebViewerStyle);

end.



--
Nard Moseley
Digital Metaphors
http://www.digital-metaphors.com