FiveTech Software tech support forums

February 2018 ============= * Enhancement: #define FW_VersionNo 18020 has been added to FiveWin.ch * New Methods class TMenu - Create TTreeView object from menu - Similar to METHOD LoadFromMenu( oMenu ) CLASS TTreeView METHOD MnuToTreeV( oParent, nTop, nLeft, nHeight, nWidth, nClrF, nClrB ) METHOD A...

El problema viene del método Define() de la Clase TBitmap, que al derivar de TControl y al llamarse al método SetColor() desde él pues crea un brush. Lo primero a arreglar es quitar esta llamada en el método Detault() de la clase TBitmap: // ::SetColor( GetSysColor( COLOR_WINDOWTEXT ), GetSysColor( ...

Enrico,

In Windows 8 works with WindowText as I explained. Maybe it has changed in 8.1

Antonio,

Antonio Linares wrote:regedit.exe

search for WindowText, repeat with F3

change two lines above (Window) from 255 255 255 to 180 180 180

Did you mean Window, not WindowText, right?

EMG

xref.doc Author: 26/10/11   11:32:10 Token Cross-Reference Report ------------------------------------------------------------------------------- 767 tokens are included in this report. Legend for context symbols:    (blank) reference does not change the variable or field value.    = variable or fie...

regedit.exe

search for WindowText, repeat with F3

change two lines above (Window) from 255 255 255 to 180 180 180

Con el siguiente código compilado con -xHarbour 1.2.1 FWHX 11.07 Borland C++ 5.82- no me salta de un GET al siguiente ni con <Intro> ni tampoco con <Tab>, solo accedo a escribir en los GET pinchando en él con el ratón. Si lo compilo con -xHarbour 0.99.61 FWXH 2.8 September 2006 Borland C...

Antonio, Thanks. It works now. Also, it´s pending the other bug in clause NO MODIFY. In method initiate() you could also comment out SetColor( GetSysColor(COLOR_GRAYTEXT) , GetSysColor( COLOR_BTNFACE )): if ::lReadOnly .and. ::nClrText == GetSysColor( COLOR_WINDOWTEXT ) ; .and. ::nClrPane == GetSysC...

... the task of my main project before start the compilation process, but the focus of the APP don't back for the compilation. PS.: I Don't have the WindowText of this other APP so I can't use this code bellow    CFILENAME := "test.exe"   IF ISEXERUNNING( CFILENAME( ...

I suggest a better approach to determing READVAR() is by using :oGet:Name by making the following simple changes to FHW source: 1. In FIVEWIN.CH: #xcommand REDEFINE GET [ <oGet> VAR ] <uVar> ; [ ID <nId> ] ; [ <dlg: OF, WINDOW, DIALOG> <oDlg> ] ; [ <help:HELPID, HELP...

Desculpas, aqui la classe correcta: //-> con modificaciones - 23/09/2008 #include "FiveWin.ch" #include "Constant.ch" #define SS_CENTER 1 #define SS_RIGHT 2 #define SS_GRAYRECT 5 // BOXRECT #define TA_LEFT 0 #define TA_RIGHT 2 #define TA_CENTER 6 #define TA_TOP 0 #define TA_BOTTOM 8 #define COLOR...

* ============================================================================ * TSBrowse.PRG Version 7.0 Jul/15/2004 * ============================================================================ /* This Classs is a recapitulation of the code adapted by Luis Krause Mantilla, of FiveWin classes: TCB...

BITMAPS -------------------------------------------------------------------------------- It is easy to use a bitmap in a listbox. Local Lbx2Bmp := {ReadBitMap(0,"Leeg.Bmp"),; ReadBitMap(0,"Gevuld.Bmp") } This can be used in a listbox. At this way the program directory contains a lot of files. If pos...

Antonio, Is there a reason that a window defaults to a white foreground color? This is from TWindow:New(): Default... nClrFore := CLR_WHITE, nClrBack := GetSysColor( COLOR_WINDOW ),; It seems this sould be: nClrFore := GetSysColor( COLOR_WINDOWTEXT), nClrBack := GetSysColor( COLOR_WINDOW ),; The way...

Antonio, adicionei o código e funcionou, porém ao editar uma célula (leditcol), agora estou tendo que apertar a tecla ESC duas vezes para sair da edição? MINHA TWBROWE: // Modificaciones y Agregados a la TWBrowse version FW2.1 // ====================================================== // 1) Nueva var...