FiveTech Software tech support forums

... foro: Estoy iniciando mis pininos con la clase TExplorerBar, me gustaría crear una ventana principal y sobre ella meter la TExplorerBar, al estilo TOutLook. He revisado los ejemplo en FW pero crean su propia ventana, necesito la principal al fondo. Algún pequeño ejemplo será bien agradecido. Saludos

... fsdi2006) perhaps because I tried many solutions and all not run ok I lose much time on past years to found a good solution for a sample : the Toutlook class and the explorerbar class have problem with dialog NOT 4 STYLE .... it run good on windows class it make easy ERROR DEF CONTROL if I ...

I have emailed .prg with one solution, problem is with class

Problem not is C5New.prg, not problem with functions CreaFBold or CreaFCapt

You use VTaskBar, why not use TOutlook?

Regards

... September 2015 (revised build) ============================== * Fix: Fixed bug in function ExtTextOut(). * Unicode support extended to messagebar, TOutlook (all versions), TTreeView, TExplorerbar, TVistamenu, Tooltips, c5tooltips, etc * Enhancement: Tooltip of oBtn TGet September 2015 ============== ...

September 2015 (revised build)
==============================

* Fix: Fixed bug in function ExtTextOut().

* Unicode support extended to messagebar, TOutlook (all versions), TTreeView, TExplorerbar, TVistamenu, Tooltips, c5tooltips, etc

* Enhancement: Tooltip of oBtn TGet

Solucionado.
Muchas Gracias Mr Rao.

Here you are Mr Rao.
Thanks.

I can not see your images

Hi, very good
But can you see this problem
Sorry but image don't see. In BtnBmp buttom appear "btnbmp" in image.

TIA

Please also change line no.1157 as

Code: Select all  Expand view

     aBmpRect    = IfNil( ::aBmpRect, If( ::oWnd:isKindOf( "TBAR" ), ::oWnd:aBmpRect, nil ) )
 

... Pack 3 Time from start: 0 hours 0 mins 17 secs Error occurred at: 11/05/15, 10:21:12 Error description: Warning BASE/1004 Message not found: TOUTLOOK:ABMPRECT Stack Calls =========== Called from: source\rtl\tobject.prg => TOUTLOOK:ERROR( 0 ) Called from: source\rtl\tobject.prg => TOUTLOOK:MSGNOTFOUND( ...

Thanks for pointing out the problem. This requires a fix. Please make this modification in your btnbmp.prg. This is the code at line no.1130 in method PaintBitmap() of tbtnbmp class.   if ::lBarBtn .and. ::oWnd:lLegacyLook .and. !::lAlpha .and. ( Empty( ::cCaption ) .or. ::cCaption ...

Hi, thanks you attention. @ -1, -1 OUTLOOK oOut ; SIZE 100, oWMain:nHeight() ; PIXEL ; FONT oFont ; OF oWMain DEFINE GROUP OF OUTLOOK oOut PROMPT "&Principal" DEFINE BITMAP OF OUTLOOK oOut ; RESOURCE "EXIT" ; PROMPT "Salir de la aplicaciَn" ; ACTION fnQuit() DEFINE ...

May we know if you created this button (btnbmp) with the command
DEFINE BUTTON OF ...........
or
@ x,y BTNBMP ......
?
Can you please provide the program code creating this button?

... Pack 3 Time from start: 0 hours 1 mins 33 secs Error occurred at: 08/05/15, 15:10:42 Error description: Warning BASE/1004 Message not found: TOUTLOOK:LLEGACYLOOK Stack Calls =========== Called from: source\rtl\tobject.prg => TOUTLOOK:ERROR( 0 ) Called from: source\rtl\tobject.prg => ...