FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour REQUEST FOR XBROWSE FUNCTION
Posts: 838
Joined: Wed Aug 22, 2007 10:09 AM
REQUEST FOR XBROWSE FUNCTION
Posted: Sat Apr 10, 2021 07:18 AM

Hello,

Hope first of all you are doing well.

I would like to make two requests for the Xbrowse() function please:

  • Use FWstrings to translate MsgNoYes( "Delete Record?" ), ITEMS { "Search For", "Show Only" } ;, etc. the rest of messages.

  • Make the size of the dialog bigger, as it is too small, also considering that monitors now offer more resolution.

Thank you. All the best

Saludos / Regards,



FWH 20.04, Harbour 3.2.0 dev (r1909261630) y BCC 7.40
Posts: 6984
Joined: Fri Oct 07, 2005 07:07 PM
Re: REQUEST FOR XBROWSE FUNCTION
Posted: Sat Apr 10, 2021 07:50 AM
Hello,
I am sure that you know that the source code of the xbrowse function is available to us in the FWH source folder.
I'm just mentioning it.
Best regards,
Otto

C:\FWH\source\function\xbrowser.prg

Code (fw): Select all Collapse
  
  if WndMain() == nil
      DEFINE FONT oFont NAME 'TAHOMA' ;
         SIZE 0,-Min( 18, Max( 8, Int( GetSysMetrics(0) / 100 ) ) )
   else
      oFont := WndMain():oFont
   endif

   DEFINE FONT oFontB NAME "VERDANA" SIZE 0, -Min( 16, Max( 8, Int( GetSysMetrics(0) / 100 ) ) ) WEIGHT 500

Continue the discussion