hello Roger
You can tell me how to put a Fon in Strikethrough
Thank you.
how to put a Fon in Strikethrough
how to put a Fon in Strikethrough
Nolberto Paulino
Regards
Regards
Re: how to put a Fon in Strikethrough
I don't know how to do this in Xbase parts using standard fonts.
If you want to display some text in a window you could use DCHTMLWINDOW and use the <strike> tag in the HTML.
If you want to display some text in a window you could use DCHTMLWINDOW and use the <strike> tag in the HTML.
Code: Select all
#INCLUDE "dcdialog.CH"
FUNCTION Main()
bHtml := {||MyHtml(oHtml)}
@ 0,0 DCHTMLWINDOW bHtml OBJECT oHtml SIZE 800,600 PIXEL ;
RESIZE DCGUI_RESIZE_RESIZEONLY
@ 620,0 DCPUSHBUTTON CAPTION 'New HTML' SIZE 100,25 PIXEL ;
ACTION {||DC_GetRefresh(GetList)}
DCGETOPTIONS RESIZE
DCREAD GUI FIT TITLE 'HTML Window' OPTIONS GetOptions
RETURN nil
* ----------
STATIC FUNCTION MyHtml( oHtml )
LOCAL cHtml
PRIVATE cTime := Time()
TEXT INTO cHtml
<html>
<body>
<h1>Hello New world!</h1>
<h2>The time is now &cTime</h2>
Don't look to the <strike>passed</strike> past. <strike>Selebrate</strike> Celebrate the present.
</body>
</html>
ENDTEXT
RETURN cHtml
The eXpress train is coming - and it has more cars.
Re: how to put a Fon in Strikethrough
thanks roger
rdonnay wrote:I don't know how to do this in Xbase parts using standard fonts.
If you want to display some text in a window you could use DCHTMLWINDOW and use the <strike> tag in the HTML.
Code: Select all
#INCLUDE "dcdialog.CH" FUNCTION Main() bHtml := {||MyHtml(oHtml)} @ 0,0 DCHTMLWINDOW bHtml OBJECT oHtml SIZE 800,600 PIXEL ; RESIZE DCGUI_RESIZE_RESIZEONLY @ 620,0 DCPUSHBUTTON CAPTION 'New HTML' SIZE 100,25 PIXEL ; ACTION {||DC_GetRefresh(GetList)} DCGETOPTIONS RESIZE DCREAD GUI FIT TITLE 'HTML Window' OPTIONS GetOptions RETURN nil * ---------- STATIC FUNCTION MyHtml( oHtml ) LOCAL cHtml PRIVATE cTime := Time() TEXT INTO cHtml <html> <body> <h1>Hello New world!</h1> <h2>The time is now &cTime</h2> Don't look to the <strike>passed</strike> past. <strike>Selebrate</strike> Celebrate the present. </body> </html> ENDTEXT RETURN cHtml
Nolberto Paulino
Regards
Regards