FiveTech Software tech support forums

Opinion ... It seems almost everyone is rushing to AI ... the worlds largest fast food company McDonalds is preparing to lay-off thousands of workers in favor of AI automation .. at what point do Humans become the enslaved and the Machines become the Masters .. We are in the midst of an AI revolutio...

I already asked ChatGpt some questions concerning xHarbour.
None of the answers were free of errors.

Sometimes natural intelligence beats artificial intelligence.

... it black" that was what i ask ChatPGT and Answer was If you are using the Win32 API to display these dialogs, you may be able to change the background color of the parent window before displaying the dialog box. Here is some sample code: not sure if i understand Answer right as my Sample ...

Maybe: https://github.com/harbour/core/blob/master/contrib/gtwvg/wvgutils.c #pragma BEGINDUMP#define _WIN32_IE 0x0500#ifdef __POCC__#define _WIN32_WINNT 0x0500#else#define _WIN32_WINNT 0x0400#endif#include #include "hbapi.h"#include #include #include #include #include "hba...

hi, i have ask ChatGPT how to color ChooseColor() If you are using the Win32 API to display these dialogs, you may be able to change the background color of the parent window before displaying the dialog box. Here is some sample code: // create the CHOOSECOLOR structureCHOOSECOLOR cc = { ...

... OF oDlg ; SIZE 500,283 PIXEL ; JUSTIFY .T.,.f.,.f.,.t.,.t.,.t.,.t.,.t. ; ALIAS cAlias AUTOSORT FOOTERS LINES CELL NOBORDER ; BACKGROUND aGrad VERTICAL oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 // anulo el doble color d los registros oBrw:lContrastClr ...

... services ( that would apply to the principles of this code ) ? I use hosted web services for websites and know some basics, but don't have a good background in how the servers function. I would like to increase my knowledge Thank you.

...        return nil      endif      return 2      > If I wish add fonts ? If I wish add aGroupby ? If I wish add a transparent image on background ? how I can do ? I tried with (but not run ) bSetUp := < |oRep, Brw, n | bImage := {|oRep| oRep:SayBitmap(0.5, 7, "NEW_REC")} ...

I check if my program is already running : (Maybe put this in a loop and background process)

Code: Select all  Expand view

  IF IsExeRunning( cFileName( HB_ARGV( 0 ) ) )
      msginfo("Program is running")
      QUIT
   ENDIF
 

... aRetVal := { nRGBRed( nColor ), nRGBGreen( nColor ), nRGBBlue( nColor ) this give me a "light-Blue" Background but not what i expect what is the right Way to use Constant of WCOLOR.CH for COLORSELECT :?:

... For Outlook emails we generate OpenXML code and for mod harbour we provide the data from Fivewin in DBF files. Upload is done automatically in the background with FTP. The guest can then additionally see his personalized offers on the web. Best regards, Otto

... OF oDlg ; SIZE 500,283 PIXEL ; JUSTIFY .T.,.f.,.f.,.t.,.t.,.t.,.t.,.t. ; ALIAS cAlias AUTOSORT FOOTERS LINES CELL NOBORDER ; BACKGROUND aGrad VERTICAL oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 // anulo el doble color d los registros oBrw:lContrastClr ...

hi,

while i can use Menu with Gradient i like to ask if Fivewin have Combobox with Gradient

i can change Foreground and Background Color into Dark-Mode but Highlight Bar ( COLOR_HIGHLIGHT ) have normal Color

btw. does Fivewin have a "Ownerdraw" Sample

... help when i want to "override" Nethod, here PaintTB() i like to use "Dark-Mode" so also TAB should have a Callback Slot for Background Color. used Color are METHOD SetDefColors( aGradSel, aGradUnSel, aGradOverUnSel, aGradOver, aGradDis ) CLASS TFolderEx...     DEFAULT ...

Thank you for your help !
Of course, I immediately tried the construction of
aCols[cl]:bClrFooter:={||{RGB(...), RGB(...)}}
aCols[cl]:RefreshFooter()
But at the same time, only the font color changes, and the background color does not change