FiveTech Software tech support forums

Sr. Antonio, utilizo la versión de FIVEWIN 17.04, y noté una pérdida de memoria en xbrowse, al usar GDIVIEW, noté que (PEN) no liberó memoria. Quizás ya lo haya corregido, pero el problema estaba en el método: METHOD Adjust() CLASE TXBrowse ... //aqui*********************************** if ::hRowPen ...

... )    //  MsgAlert( aTest[n], "Array-line : " + ALLTRIM(STR(n)) )      oText:Skip()NEXToText:Close()Return atest on main inset aSudoku := SudokuLoad(1) //nLevl1 http://www.eoeo.it/wp-content/uploads/2015/01/vv.jpg notice !! I change the header od test ...run ...

#include "FiveWin.ch" #include "XBrowse.ch" //----------------------------------------------------------------------------------------------------------------- function MiBrowse() local oDlg, oBrw, oWnd, oCol SET RESOURCES TO "Mio.dll" ErrorBlock( { | o | MsgInfo( o:Des...

Enrico, I always open and close also when using a recordset, but if I want to inset records, or delete records, I don't use recordsets. I use the oSQL:=CreateObject("ADODB.Connection") and then oSQL:execute() command. Do you use also recordsets ...

Enrico,

They look like "inset", right ?

Like this one, right ?
viewtopic.php?p=161582#p161582

Now, on a dialog the differences begin:

Now searching why that inset border appears

You should add the lines : //---------------------- while nRowPos <= nMaxRows hBrush := CreateSolidBrush( Eval( ::bClreof, Self,nrowpos )[ 2 ] ) FillRect( hDC, {nRow, acols[1]-1, nrow+::DataHeight+1, nBrwWidth }, hBrush ) DeleteObject( hBrush ) nRowPos++ nRow += nRowHeight enddo //--------- /* Pa...

Muchas gracias FranciscoA Hice los ajustes quedo asi; Y FUNCIONO !!!!!! FUNCTION EDITAFILE2() LOCAL oLbxAlmacenes,oFntArial,oFntArial2 LOCAL cFilCompra:=cImpLoc+"WI"+SUBSTR(TIME(),1,2)+SUBSTR(TIME(),4,2)+SUBSTR(TIME(),7,2)+".DBF" LOCAL aStru:={ {"FILIAL","C",2...

Ruferso, francamente no se que problema puedas tener, pero como te dije, incluso en la ver 1006 me funciona asi: Con PellesC Window Style 0x50010000 ( tú tienes puesto 0x50310000 ) Si omites lo siguiente, apararecen las barras: oBrSaldo:lHScroll := .F. oBrSaldo:lVScroll := .F. //-------------- oLbx ...

... I am issuing the insert toggle in an xBrowse bOnPreEdit .. which works .. then re-issuing it on the way out of the bOnPostEdit which does not turn Inset off .. I can tell when I navigate into a different cell that the Insert Key is still on. Here is the code .. any help would be appreciated. Thanks ...

Hello, I have a Question about xBrowse-Linestyles. I can change the Linecolors but the predefined Colors ( Linestyles ) don't work anymore on Selection. Is it possible to change from defined Pen-color to Linestyle ? It seems with defined Pencolors, Linestyle 1, 2, 3 and 4 are disabled. I would like ...

Rubén, ¿ya has intentado con esto? : nRowDividerStyle,; // Row divider style nColDividerStyle; // Col divider style AS NUMERIC // O LINESTYLE_NOLINES // 1 LINESTYLE_BLACK // 2 LINESTYLE_DARKGRAY // 3 LINESTYLE_FORECOLOR // 4 LINESTYLE_LIGHTGRAY // 5 LINESTYLE_INSET // 6 LINESTYLE_RAISED Ejemplo: oBr...

Hola amigos: Estoy desarrollando un pequeño aplicativo con tXbrowse, pero me he encontrado con los siguientes problemas: 1- Utilizando la edición directa en xbrowse, cuando ya se ha editado determinada celda (xVal grabado), y regreso a la misma celda, oprimo enter como que voy a editar de nuevo pero...

I use xbrowse to display records with 1 memo field . Is it possible to have a scroll up and down when the lenght off the field is more thant 3 lines . Thanks . oLbx2 := TXBrowse():New( oFolder:aDialogs[2] ) oLbx2:nMarqueeStyle := MARQSTYLE_HIGHLROW *oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROWMS &&a...

... the panel come attacking to first ? 4. Can swicth any panel ( open or close) ? 5. On wich type of menu I can show each items ( underline,solid,inset,raised) ? 6. Can insert an image on each panel ( no title) ? ( waterMark) and I can set the trasparency ?