xBrowse SetEditType FONT

xBrowse SetEditType FONT

Postby Otto » Mon Aug 10, 2009 5:18 pm

How can I change the font in edit modus.

Thanks in advance
Otto

Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6328
Joined: Fri Oct 07, 2005 7:07 pm

Re: xBrowse SetEditType FONT

Postby James Bott » Mon Aug 10, 2009 5:41 pm

Otto,

The edit font defaults to the same font as the display font so assuming you have changed the display font, then this should work:

oBrw:oEditFont := oFont

James
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA

Re: xBrowse SetEditType FONT

Postby Otto » Mon Aug 10, 2009 5:47 pm

Thank you, James.
It is working.
Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6328
Joined: Fri Oct 07, 2005 7:07 pm

Re: xBrowse SetEditType FONT

Postby Otto » Mon Aug 10, 2009 7:21 pm

James, do you also know how to change
EDIT_LISTBOX FONT.

Thanks in advance
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6328
Joined: Fri Oct 07, 2005 7:07 pm

Re: xBrowse SetEditType FONT

Postby James Bott » Tue Aug 11, 2009 6:16 am

Otto,

You can't specify the listbox font. The listbox is defined in this methd:

Code: Select all  Expand view
METHOD ShowBtnList( nKey ) CLASS TXBrwColumn
   ...
   @ 0, 0 LISTBOX ::oEditLbx VAR nAt OF ::oBrw SIZE 0,0 ITEMS ::aEditListTxt


Defining it without specifying a font means that it will default to the Windows default font.

Perhaps you can convince Antonio to make changes to allow it.

James
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 107 guests