FiveTech Software tech support forums

... with your solution, but now i found that I also use it in my programs, to know the location of the mail window, when closing the program. I saved nPos[2] and nPos[3] of oMenuWnd:GetRect() to know the location, but now it is not OK anymore. How can I get the location of the window, so I can restore ...

... de cada campo, es decir: Si es NombreCliente -> devolverá 1 Si es TotalVentas-> devolverá 2 function frGetValue(cField,aFrItems) local nPos:=0 nPos:=ascan(aFrItems,{|v| upper(alltrim(v))=upper(alltrim(cField))}) if nPos=0 nPos:=1 end if return nPos Fundamentalmente seria sustituir lo ...

... GRAPH_TYPE_POINTS these new datas have been added: DATA aBarCoors // Array with painted points coordinates {nY, nX, nProfundidad, nAncho, nSerie, nPos, nVal} DATA aPoints // Array with painted points coordinates {nY, nX, nSerie, nPos, nVal} How to use it: - Define the tooltip as a codeblock (oGraph:cToolTip) ...

... aFile, bAction, bWhen, oFont, c Msg, cToolTip, nHelpId, cBorder, lCancel, lAdjust, aColors, nCaptPos, lOpaque, cShape, oPBrush, bMenu, lGroup, nPos, bDrop, lUpdat .\prg\TSBUTTON.PRG(539) Error E0019 #error: 'Class "TSButton" not declared for method: ReDefine( nId, aResource, aFile, ...

Otro ejemplo sencillo: Ascan devuelve la posicion del elemento, si lo encuentra. Caso contrario devuelve 0.
Local array:={'CADIZ','MALAGA','SEVILLA','HUELVA','CORDOBA'}, cVariable:="SEVILLA"
nPos := Ascan(array,cVariable)

... SIZE 80, 30 PIXEL ; BORDER ; PROMPT " &Jan." ; FILENAME c_Pfad1 + "Kalender.Bmp" ; ACTION ( STAT_OPEN1("RECH1"), nPos := 1, ; oBrw1:cAlias := Alias(), ; oBrw1:Refresh(), ; cTitel := "Januar", oTitel1:Refresh() ) LEFT best regards Uwe :D

... it to move to that bookmark. ors:bookmark := 1st ele. Eof recno doesnt matter. You confirmed that the number of eles in the array was correct and npos = 0 wich means not found! You confimed in while !eof() that the indexkey(0) its correct. I cant see what ghost record has to do with it or go top ...

Please place a msginfo in ado.seek after ELSE //WITH :FILTER OR MOE THAN ONE FIELD and check if it is called.

Yes, is called

You can place another one in the else for not softseek reporting npos.

shows 0

Gunther,

Please place a msginfo in ado.seek after ELSE //WITH :FILTER OR MOE THAN ONE FIELD and check if it is called.

You can place another one in the else for not softseek reporting npos.

Hello..

nPos := 4

ADEL(aDetVen, nPos, .t.) // .t. resize array

... las siguientes lineas: if ::oGet:Type == "N" .and. ( Chr( nKey ) == "." .or. Chr( nKey ) == "," ) IF ALLTRIM(STR(::npos))='1' mivar1=::oGet:buffer mivar1=VAL(mivar1) IF mivar1>0 mivar1=mivar1-INT(mivar1) ENDI mivar1=STR(mivar1) ::oGet:VarPut( VAL(mivar1) ) ::Refresh() ...

... cuando entramos a modificar el campo GET numerico con un valor ya asignado y el cursor dentro del GET se encuentre al inicio del campo if ::oGet:nPos:=1 Si pulsamos en ese momento el punto decimal queremos que el método borre el valor previo de nuestra variable le asigne un valor CERO mas PUNTO ...

... sea para un solo get o en todos los controles del Get. He leido el otro parametro que no le entiendo para que funcion se utiliza SetPos() y luego nPos o SetPos(nPos() para que servira ese metodo en los gets y demas controles...??? Espero que el maestro Antonio Linares nos apoye con ese detalle ...

Thanks Guys,

The problem was solved changing the code for this:

nPos := 4
oAct:Document():All:Item("grupo_radio",nPos):Checked := "true"

... combobox * New functions in file: NONCLIENT.C - GETNONCLIENT and SETNONCLIENT, use and modify struct NONCLIENTMETRICS Parameters GETNONCLIENT( nPos ) -> look nPos in the struct NONCLIENTMETRICS Parameters SETNONCLIENT( nPos , uVal, bActWinIni ) - SETWHSCROLL( hWnd , nPos , nVal, ActWinIni ...