| Unit RichView |
| Classes |
TCPInfo - ------------------------------------------------------------------
TDrawLineInfo - ------------------------------------------------------------------
TJumpInfo - ------------------------------------------------------------------
TLineInfo - ------------------------------------------------------------------
TRichView - ------------------------------------------------------------------
TRVInteger2 - ------------------------------------------------------------------
| Functions |
InfoAboutSaD - -------------------------------------
Register - ------------------------------------------------------------------} {$I RV_Save.
| Types |
TBackgroundStyle
TJumpEvent
TRVDblClickEvent
TRVDisplayOption
TRVDisplayOptions
TRVMouseMoveEvent
TRVRightClickEvent
TRVSaveComponentToFileEvent
TRVSaveFormat
TRVSaveOption
TRVSaveOptions
TRVURLNeededEvent
TScreenAndDevice
| Constants |
rvsBreak
rvsBullet
rvsCheckPoint
rvsComponent
rvsHotSpot
rvsPicture
| Variables |
| Functions |
| Types |
TBackgroundStyle = (bsNoBitmap, bsStretched, bsTiled, bsTiledAndScrolled);------------------------------------------------------------------
TJumpEvent = procedure (Sender: TObject; id: Integer) of object------------------------------------------------------------------
TRVDblClickEvent = procedure (Sender: TRichView; ClickedWord: String; Style: Integer) of object
TRVDisplayOption = (rvdoImages, rvdoComponents, rvdoBullets);------------------------------------------------------------------
TRVDisplayOptions = set of TRVDisplayOption
TRVMouseMoveEvent = procedure (Sender: TObject; id: Integer) of object
TRVRightClickEvent = procedure (Sender: TRichView; ClickedWord: String; Style, X, Y: Integer) of object
TRVSaveComponentToFileEvent = procedure (Sender: TRichView; Path: String; SaveMe: TPersistent; SaveFormat: TRVSaveFormat; var OutStr:String) of object
TRVSaveFormat = (rvsfText,
rvsfHTML,
rvsfRTF, //<---not yet implemented
rvsfRVF //<---not yet implemented
);
TRVSaveOption = (rvsoOverrideImages);<---not yet implemented
TRVSaveOptions = set of TRVSaveOption
TRVURLNeededEvent = procedure (Sender: TRichView; id: Integer; var url:String) of object
TScreenAndDevice = record------------------------------------------------------------------
ppixScreen : Integer;
ppiyScreen : Integer;
ppixDevice : Integer;
ppiyDevice : Integer;
LeftMargin : Integer;
end;
| Constants |
| Variables |