FiveTech Software tech support forums

... ; lAdjust, nSeparator, nOption, bPopUp, lStretch, ; cLayOut, bBmpAction, nBright, lAnimate, nSpeed, oFontDefault, ; lTransparent, aDialogs, lBorder, nClrPane, cVarName ) so ON PAINT TAB  -> bClrTabs ON PAINT TEXT -> bClrText

... <uAction>}], <nBright>,; <.lAnimate.>, [<nSpeed>], <oFont>, <.lTransparent.>, [\{<cDlgsName>\}], ; <.lBorder.>, <nClrPane>, [<(oFolder)>] )      oTab_Left  := TFolderEx() :New( 40 + nBB, 1, ( nWidth / 2 ) - 05, nHeight ...

From Whatnew * TWindow Method SayText( cText, aRect, cAlign, oFont, nClrText, nClrBack, lBorder ) Applies to all derived classes like dialogs and controls To be used in o:bPainted. function FW_SayText( hDC or oWnd, cText, aRect, cAlign, oFont, nClrText, nClrBack, lBorder ...

My mistake, you have to call it this way:

// Class TPanel Method Redefine( nId, oWnd, lDesign, cVarName, lBorder )

oPanel := TScrollPanel():Redefine( 101, oDlg )

Also, you have to call oPanel:SetFont( oDlg:oFont ) from the ON INIT clause of the ACTIVATE DIALOG

Silvio.Falconi wrote:why not run ????

@ 98, 115 Say oSay[4] Prompt "Colore Bordo" SIZE 80,14 PIXEL OF oDlg TRANSPARENT WHEN lBorder

There is no WHEN clause in SAY command.
Please see fivewin.ch.

why not run ????

@ 98, 115 Say oSay[4] Prompt "Colore Bordo" SIZE 80,14 PIXEL OF oDlg TRANSPARENT WHEN lBorder

... TRANSPARENT // SHADOWSIZE 15 // BOTTOMRIGHT @ 30, nY TITLE oBar_AA Size 480, 430 of oMainWnd TRANSPARENT // SHADOWSIZE 15 // BOTTOMRIGHT oBar_AA:lBorder := .T. oBar_AA:nShadowIntensity = 20 oBar_AA:lRound := .T. n:= 0 // Draw horizontal lines For t = 1 To Len(aVar_AA) @ tX+n+3,tY TITLETEXT OF ...

... especifica o si algún elemento es nulo, se utilizan colores predeterminados. - METHOD PrintTable( nRow, nCol, oTable, nWidth, nHeight, [oFont], [lBorder], ; [cTitle], [cUnits] ) Útil para incrustar una tabla simple y pequeña dentro de un área especificada en un documento impreso. oTable: Datos ...

... objects. If not specified or if any element is nil, default colors are used. - METHOD PrintTable( nRow, nCol, oTable, nWidth, nHeight, [oFont], [lBorder], ; [cTitle], [cUnits] ) Useful for embedding a simple and small table within a specified area in a ; print document. oTable: Data to the displayed ...

... !!! I would like to change the image-border at runtime. From class TBitmap I use :nStyle , because there is no method in class TImage like oImage:lBorder := .F. @ 55, 430 COMBOBOX oCbx1 VAR cImgBorder  ITEMS { "Border", "NO border" } ;SIZE 50, 50 OF oSDlg  PIXEL FONT ...

using NOBORDER or lborder := .f. has the same result
i.e.
when the mouse is over the bitmap the border appears but when created from code it doesn't

Regards
Peter

... nId, cResName1, cResName2, cBmpFile1, cBmpFile2,; cMsg, bAction, oBar, lAdjust, bWhen, lUpdate,; cToolTip, cPrompt, oFont, cResName3,; cBmpFile3, lBorder , cLayout, cResName4, cBmpFile4, lTransparent,; lRound, bGradColors ) regards uwe :D

Hola,
seria posible sacar el borde del bmp boton del ACTION de un GET ?

he probado oGet:obtn:lBorder:= .f. y no funciona.

Gracias.

... PIXEL OF oDlg FLAT NOBORDER ; COLOR nClrText, nClrBack WITH OBJECT oBtnPrint :bAction := dummy() :nClrBorder := nClrBorder :bColorMap := { | o | o:lBorder := o:lMOver, nCBorder } :oFontBold := oBold :lRound := .F. END SomeOne can help me please

... ] ; //-->> byte-one 2010 [ <lTransparent: TRANSPARENT> ] ; [ <dlg: DIALOG, DIALOGS, PAGE, PAGES> <cDlgsName,...> ] ; [ <lBorder: NOBORDER > ] ; [ COLOR <nClrPane> ] ;