FiveTech Software tech support forums

Hello Uwe, the code is on http://www.atzwanger.com/tests/emf.zip I changed for testing purpose rpreview.prg METHOD Activate() CLASS TPreview // ACTIVATE WINDOW ::oWnd MAXIMIZED ; Changed to ACTIVATE WINDOW ::oWnd ; METHOD BuildWindow() CLASS TPreview DEFINE WINDOW ::oWnd ; TITLE cTitle ; COLOR CLR_B...

Carlos,

Tienes que reemplazar CLR_LIGHTGRAY por CLR_HGRAY dentro de source\classes\rpreview.prg

Deberías plantearte empezar a usar FWH y Harbour, para asi pasar tu aplicación a 32 bits y así solucionar limitaciones propias de los 16 bits.

Antonio, below is a sample i just created, To reproduce, set the cursor on Enrico for instance then click on add and add any name, watch the first line Move the mouse to the first line , see what happens and then watch the last line Thanks for help, #include "FiveWin.ch" #include "xbrowse.ch" functi...

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...

I try to give out text to a window Some text with the argument Transparent = true other with false but the argument is not respected. After the first use of transparent the rest is transparent although the argument is set to false. oWndPlan:Say( 150, 50, "TEST1", 8421504 ,"B",oLbxFont,.t.,.f.)<--...

Amigos del foro: Estoy intentando mis primeros pasos con ADO y pretendo hacer un browse con TXBrowse, esto es parte de mi código oBrw := TXBrowse():New( oWnd ) oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROW oBrw:lColDividerComplete := (.T.) oBrw:nRowDividerStyle := LINESTYLE_LIGHTGRAY oBrw:nColDividerStyl...

Olas amigos, un preguntilla de un problema ke se me vino encima y no logro dar con el asunto. Uso un timer ke me refresca una Tabla en Mysql que tengo en un servidor, le puse el timer para que cada cierto tiempo refresque el browse, pero por alguna rason cuando le dar un click a los heders se descon...

METHOD SetMySQL(oQuery) METHOD Report( cTitle, lPreview, aheaders,afooters,oFont, nLang, cCaption, lModal ) METHOD RPTSKIP() METHOD NTOTAL() METHOD SAVE() METHOD end() INLINE ::Destroy() METHOD SetMySQL(oquery,ledit) CLASS TXBrowse ::nMarqueeStyle := MARQSTYLE_HIGHLCELL ::nColDividerStyle := LINESTY...

Me gustaria poner un color distinto al browse cuando este enfocado, esta era mi tecnica: ( i would like paint a diferent color the headers from the browse, this was my tecnique : ) desde el browse: ( from the browse() ) ta:bLostFocus := {|| DejaFoco(ta) } ta:bgotfocus := {|| TomaFoco(ta) } y mis fun...

... TFolder Method GotFocus(), minor fix. * Enhancement: Disabled GETs in 32 bits now can show whatever color you may want, not the Windows imposed lightgray color. Simply set the color to the GET using COLOR ...,... clause or use oGet:SetColor( ...,... ) method call and set the DATA lDisColor to ...