> >
> >

> > PUBLIC oform1
> > oform1=NEWOBJECT("form1")
> > oform1.Show
> > RETURN
> > 
> > DEFINE CLASS form1 AS form
> > 	Top = 108
> > 	Left = 218
> > 	Height = 205
> > 	Width = 327
> > 	DoCreate = .T.
> > 	Caption = "Form1"
> > 	Name = "form1"
> > 
> > 	ADD OBJECT text1 AS textbox WITH ;
> > 		Height = 73, ;
> > 		Left = 24, ;
> > 		Top = 72, ;
> > 		Width = 265, ;
> > 		Name = "Text1"
> > 
> > 	ADD OBJECT command5 AS commandbutton WITH ;
> > 		Top = 36, ;
> > 		Left = 96, ;
> > 		Height = 27, ;
> > 		Width = 84, ;
> > 		Caption = "Process", ;
> > 		Name = "Command5"
> > 
> > 	PROCEDURE command5.Click
> > 		CREATE cursor Chars (NumberVal I, CharVal C(1))
> > 		FOR x = 33 TO 255
> > 		INSERT INTO Chars (NumberVal, CharVal) ;
> > 		VALUES (x, CHR(x))
> > 		ENDFOR
> > 		*brow font "foxfont"
> > 
> > 		thisform.text1.fontname="Foxfont"
> > 		thisform.text1.fontsize=28
> > 		thisform.text1.controlSource="Chars.Charval"
> > 
> > 
> > 		declare integer Sleep in win32api integer
> > 
> > 		scan
> > 		thisform.text1.value=Charval
> > 		sleep(50)
> > 		endscan
> > 	ENDPROC
> > 
> > 
> > ENDDEFINE
> > *
> > *-- EndDefine: form1
> > 

> >
> > for installing a font on a report , open the designer...properties.....font
> >
> >
> >
> > Dont rate please.its only for the pleasure to help.Give me only a feed back.
> > Yousfi Benameur
>
> *********************************************************************************************
> *********************************************************************************************
>
> Hello again,
>
> Well, I got the symbol displayed on the text box ok. The only two issues that I'm facing right now are to store this "Less than or Equal to" symbol in the table and to show this symbol on the report. I have tried to open the report designer to change the font to FoxFont but from the list for me to select, there was no FoxFont at all. I even tried this again after I received your message. Here are the steps that I took
>
> 1/ Opened the report designer
> 2/ Right-clicked on it to go to Properies
> 3/ Clicked on the "Page Layout" tab, then selected a font from a list to insert into the Default font text box.
>
> I couldn't find FoxFont for some reason. And I think the value on the text box was being inserted into the table as the ascii code instead and there is a way if possible to convert that as it is being inserted into so that it will insert the correct symbol. Have a nice day to you.
>
> Tai Nguyen.


Yes you are right, foxfont is not in the fontname list in report designer.
then use the font symbol it exists.

CREATE cursor Chars (NumberVal I, CharVal C(1))
FOR x = 33 TO 255
INSERT INTO Chars (NumberVal, CharVal) ;
VALUES (x, CHR(x))
ENDFOR
brow font "symbol"

your values are in 163 &179 as confirmed by Koen.


Dont rate please.its only for the pleasure to help.Give me only a feed back.
Yousfi Benameur