FiveTech Software tech support forums

Have you ever had a checkbox and used the ""WindowsXP.Manifest" option? IF I made for a sample @ nRow,oBox[1]:nLeft+60 CHECKBOX aDat[ 5] VAR l05 Prompt axArray[ 5, 2 ] SIZE 350, 20 PIXEL OF oDlg aDat[ 5]:lTransparent:=.t. this gate covers the lower part of the dialog, hiding the ...

...     oBPar:bLDblClick:={|| IF(oT:lNew,Captura(.F.),)}      oBPar:bGoTop   :={||  GoToTop(oDPar,oT:aDat[1])}      oBPar:bGoBottom:={||  GoToBot(oDPar,oT:aDat[1])}      oBPar:bSkip    :={|n| MovePtr(oDPar,oT:aDat[1],n)} ...

... * Enhancements on Class TGraph - Added support for XY Graphs, not only time series - Added Method AddXYSerie( aDat, cLegend, nColor, nType, l3D, lViewVal, lDrawPoint, lDrawLine, cSRLegend ) aDat as { {x1, y}, {x2, y2}, {x3, y3}, .... } - Added types GRAPH_TYPE_XY_LINES ...

Defintion of series have more of 4 parameters METHOD AddSerie( aDat, cLegend, nColor, nType , l3D, lViewVal, lDrawPoint, lDrawLine, cSRLegend ) CLASS TGraph and you defintion is oGraph:aSeries = { { "Series 1", CLR_CYAN , , },; // only 4 parameters ...

Thank You very much for the info my working solution : http://www.pflegeplus.com/IMAGES/MGet2.jpg Reading the multiline GET aDat[90] := STRTRAN(("PATIENT")->MEDIKAM1, CRLF, "|") aDat[91] := STRTRAN(("PATIENT")->MEDIKAM2, CRLF, "|") ...

... loading some fields to be shown in folder-pages nothing special. and are neede to do some calculations on button < SAVE > FUNCTION PAT_GET() aDatP[1] := ("KUNDE")->ANREDE aDatP[2] := ("KUNDE")->NAME1 aDatP[3] := ("KUNDE")->NAME aDatP[4] := ("KUNDE")->ANSCHRIFT ...

Cristobal, thank You very much. I think I have to use oGraph1:AddSerie( aJS1,"Serie", 16771797 ) // AddSerie( aDat, cLegend, nColor, nType, l3D ) changing the array, the refresh is working fine http://www.pflegeplus.com/IMAGES/Tgraph7.jpg Changing the values ...

Antonio, I found that "METHOD AddSerie( aDat, cLegend, nColor, nType, l3D )" is creating the same aDat array twice (when using two series value) to hold first and second series. This the reason that I had to add two arrays in this method ...

... STATIC FUNCTION EditList(EsAlta,oWPpal) RETURN NIL //--------------------- STATIC PROCEDURE BUSGIR(aDat,vgItem1) //--------------------- Local xgItem4 := aDat[Val(vgItem1)] Return xgItem4 //---------------------- STATIC FUNCTION Grabadat(Grabar,Esalta,vVar) ...

... //sin cambio Serie2={3,NIL,NIL,3} => {3,NIL,NIL,3,,,,,} //tamaño 8 * Se ha añadido tres nuevos parametros al metodo AddSerie() AddSerie( aDat, cLegend, nColor, nType, l3D, lViewVal, lDrawPoint, cxLegend ) lViewVal: por defecto .T. y si es .F. no muestra los valores de esta serie lDrawPoint: ...

... procedure oT:=CA_210():New() CLASS CA_210   DATA lNew, lAdd, lEnd, lFst, lCap, lApp, lGpo   DATA oDat, oPar, aPar, oBtn, aTot, aDat, cGpo   DATA cPic1, cPic2, cPic3, cPic4   METHOD New() CONSTRUCTORENDCLASSMETHOD New() CLASS CA_210   ::lNew:=.F.  ...

it compile and link exe file when I open the exe it make error @ 3,0.5 GET oT:oDat[ 1] VAR oT:aDat[ 1] SIZE 40,12 OF oDlc PICTURE "999999" VALID Val_Doc() WHEN oT:lNew @9.5,30.8 GET oT:oDat[32] VAR oT:aDat[32] OF oDlc SIZE 65,11 PICTURE "99,999,999.99" ...

... resource dialog and make it with redefines command all picture on the dialog run ok when i use the dialog make with @x,y no resource it nou run oT:aDat[32] is not nil because when open the dialog I load all the variables oT:oDat[ 1]:Enable() oT:oDat[ 1]:Refresh() oT:lApp:=oT:lEnd:=oT:lFst:=oT:lNew:=.T. ...

I suspect the value of oT:aDat[32] is nil.

Transform( nil, '999.99' ) generates the same runtime error.

WHY WHEN i INSERT THE PICTURE MAKE ERROR ? @9.5,30.8 GET oT:oDat[32] VAR oT:aDat[32] OF oDlc SIZE 65,11 PICTURE "99,999,999.99" Error description: Error BASE/1122 Argument error: TRANSFORM Stack Calls =========== Called from: => TRANSFORM(0) Called ...