Module HtmlFormat_mixin.pkg
1//****************************************************************************//
2// //
3// $File name : Html_mx.PKG //
4// $File title : HTML conversion functions //
5// $Author : John Tuohy //
6// //
7// Confidential Trade Secret. //
8// Copyright 1998-1999 Data Access Corporation, Miami FL, USA //
9// All Rights reserved //
10// DataFlex is a registered trademark of Data Access Corporation. //
11// $Rev History //
12// //
13// //
14// $Rev History //
15// 8/13/98 jjt - created //
16// //
17//****************************************************************************//
18use VDFBase.pkg
19
20// Helper functions for HTML
21//
22{ ClassLibrary=Common }
23Class HtmlFormat_mixin is a Mixin
24
25 function HtmlAnchor string sDat returns String
26 function_return ("" + sDat + "")
27 End_function
28
29 function HtmlBig string sDat returns String
30 function_return ("" + sDat + "")
31 End_function
32
33 function HtmlBlink string sDat returns String
34 function_return (" + sDat + "")
35 End_function
36
37 function HtmlBold string sDat returns String
38 function_return ("" + sDat + "")
39 End_function
40
41 function HtmlFixed string sDat returns String
42 function_return ("" + sDat + "")
43 End_function
44
45 Function HtmlFontColor String sFontClr Returns String
46 function_return ('+ sFontClr + '">')
47 End_function
48
49 function HtmlFontSize integer iSize returns String
50 function_return ('+ string(iSize)+ '">')
51 End_function
52
53 function HtmlItalics string sDat returns String
54 function_return ("" + sDat + "")
55 End_function
56
57 function HtmlLink string sURL string sDat returns String
58 function_return ('+ sURL + '">' + sDat + '')
59 End_function
60
61 function HtmlSmall string sDat returns String
62 function_return ("" + sDat + "")
63 End_function
64
65 function HtmlStrike string sDat returns String
66 function_return ("" + sDat + "")
67 End_function
68
69 function HtmlSub string sDat returns String
70 function_return ("" + sDat + "")
71 End_function
72
73 function HtmlSup string sDat returns String
74 function_return ("" + sDat + "")
75 End_function
76
77 function HtmlStrong string sDat returns String
78 function_return ("" + sDat + "")
79 End_function
80
81 function HtmlEmph string sDat returns String
82 function_return ("" + sDat + "")
83 End_function
84
85 function HtmlHeader integer iHeader string sDat returns String
86 string sHdr
87 Move (String(iHeader)) to sHdr
88 function_return (" + sHdr + ">" + sDat + " + sHdr + ">")
89 End_function
90
91
92end_class
93