REQUEST FOR XBROWSE FUNCTION

[MOISES]

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

[Otto]

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: Select all  Expand view

 
  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