FiveTech Software tech support forums

... atitcol := '' local acampos := {} local lcampos local aBmp := { "TildeR.bmp", "TildeA.bmp", "TildeV.bmp" } Private oBar2 acampos := {|| {str(Corregir->Numero,4),dtoc(Corregir->FechaError),Corregir->Tema,if(Corregir->Estado=1,aBtms[1], if(Corregir->Estado=2,aBtms[2],aBtms[3]) ...

... {|| ' '+str(Consorc->Consorcio,2)+' '+Consorc->Nombre+' '+Consorc->Direccion } local atitcol := "Cod Nombre Domicilio" Private oBar2 // imagen tooltip en boton en tooltip aBotones := { {"User.bmp" ,"Agrego Registro " , "Agregar" , {|| editoCons(.t.),oBrw:SetFocus(),oBrw:refresh() ...

I have a Main window with a bar at INIT the height of Bar is 0 on this bar I wish create two bars each bar (oBar1 or oBar2) is created when his value (lbar1 or lBar2 ) is true ( the final user set if true or false) and the height of Bar must add of 25 I made also a minimal test to ...

... ::oBar1:bLClicked := { || NIL } ::oBar1:bRClicked := { || NIL } AEval( ::oBar1:aControls, { |x| x:oCursor := oCursor } ) @ 26, -1 BUTTONBAR ::oBar2 OF oBar 3D SIZE oBar:nWidth - 1, 29 ; BUTTONSIZE 26, 27 //sample button DEFINE BUTTON RESOURCE "RTFNEW" OF ::oBar1 GROUP ; MESSAGE "Creates ...

the problem is coordinates of menu referenced of button of second buttonbar ::oBar2 on the first ::oBar1 run ok but I need it on second buttonbar Sorry but here I made : the first oBar is the mother od ::oBar1,::oBar2,::oBar3 on ::oBar1 and ::oBar2 there are buttons ...

... not the case. The Icons used are alpha blend bitmaps .. don't know if that has any bearing on the subject .. just curious if there is a way when I oBar2:Disable() .. the bitmaps would 'grey out' ?? Thanks Rick Lipkin DEFINE BUTTONBAR oBar2 OF oWndMDI SIZE 100,80 3DLOOK 2007oBar2:SetColor(0)DEFINE ...

Hola Luiz:

Cambia esta instrucción:
Define ButtonBar oBar2 size 60,60 Of oDlg TOP 2007

Por esta:
Define SButtonBar oBar2 size 60,60 Of oDlg TOP OFFICE

Un abrazo.

Manuel Mercado.

... 0.50,32768,16777215 } } ) } <==== oBar:nClrText := 16777215 A new field for the Bar-object is added. It is possible now, to define oBar, oBar1, obar2 .... inside the tool. Download : http://www.pflegeplus.com/fw_downloads/Bargradient3.zip here is a complete working sample. It is the basic-structure ...

... Not a clue as to problem. Makes no sense. if i comment out code in the prg links perfectly using rmk file. Here is my code. DEFINE BUTTONBAR oBar2 SIZE 76.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR oBar3 SIZE 78.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR oBar4 SIZE 78.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR ...

... line number information 2) Here it seems as you are trying to build four buttonbars: DEFINE BUTTONBAR oBar SIZE 33,33 OF oWnd1 DEFINE BUTTONBAR oBar2 SIZE 76.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR oBar3 SIZE 78.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR oBar4 SIZE 78.5 ,36.25 3D OF OWND1 Is that your ...

... 75 ; TITLE "Up Your Cash Flow XT2-2009" ; MENU( BUILDMENU()) ; COLOR CLR_GRAY, CLR_GRAY DEFINE BUTTONBAR oBar SIZE 33,33 OF oWnd1 DEFINE BUTTONBAR oBar2 SIZE 76.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR oBar3 SIZE 78.5 ,36.25 3D OF OWND1 DEFINE BUTTONBAR oBar4 SIZE 78.5 ,36.25 3D OF OWND1 DEFINE BUTTON ...

... BUTTON FILE ".\bitmaps2\R15.bmp" OF oBar ; ACTION oWnd:End(); PROMPT "Ende" oPanel2 := TPanel():New( 18, 0, 75, 2000, oWnd ) DEFINE BUTTONBAR oBar2 OF oPanel2 SIZE 60, 70 2007 DEFINE BUTTON oBtnDel FILE ".\bitmaps2\K4.bmp" OF oBar2 ; ACTION msginfo("..."); PROMPT "löschen" SET MESSAGE OF oWnd ...

... to the SetKey function so I used a function key. ***************** #include "fivewin.ch" function main() local oWnd local nClrText local oBar2 local oFont DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 0, -10 DEFINE WINDOW oWnd TITLE "Test" SetKey( VK_F2, { || ExecFunc(2) } ) oBar2 := TC5StBar():New( ...

... remains. Thanks in advance Otto http://www.atzwanger.com/fw/tab1.jpg #include "FiveWin.ch" static oWnd function Main() local oBar,oBar2, oPopup, oBtn , oTabs2,oPanel,oPanel2 SetBalloon( .T. ) // Balloon shape required for tooltips DEFINE WINDOW oWnd TITLE "Office 2007" @ 8, 0 TABS ...

... ) ------------------------------ #include "FiveWin.ch" #include "Splitter.ch" #include "xbrowse.ch" function Main() local oWnd, oFont, oBar1, oBar2 // Array for Dialog-Size aCors := {} DEFINE WINDOW oWnd TITLE "Outlook-Test" MDI DEFINE BUTTON OF oBar2 ACTION ( BuildDlg(oWnd) ) ; RESOURCE "magic" ...