FiveTech Software tech support forums

Here is a sample for ordwildseek. It's new to me.... https://forums.fivetechsupport.com/viewtopic.php?f=3&t=39965 Mr. Venken OrdWildSeek( cSeek, ... ) is actually an (x)Harbour function in DBFNTX and DBFCDX RDDs, applicable for ...

Here is a sample for ordwildseek. It's new to me....

viewtopic.php?f=3&t=39965

when usig OrdWildSeek() in XBROWSE how to "continue" :?: i did not found a 2nd OrdWildSeek() or a loop No need for 2nd call or loop. OrdWildSeek(oBrw:cSeek, oBrw:lSeekNext ) works for first seek and SeekNext ...

... to use "Header - click" to SET Order / TAG :?: in METHOD SetOrder( lSort ) i found OrdDescend() how does OrdDescend() work :?: when usig OrdWildSeek() in XBROWSE how to "continue" :?: i did not found a 2nd OrdWildSeek() or a loop

Good idea. We will try to protect some more methods/datas.
Still we can not do it for all because some methods/datas are used both by the browse object and column object.

There are lots of examples of xbrowse in the forums and lastly we are always here to support you in every way.

hi

thx for Anwser

i´m still a Newbie and it is hard to learn when have no Documentation or Sample CODE

what do you think to declare Method as "PROTECT" if User should not use a Method "direct<"

XBrowse and TDataRow (alias FW_Record) work with all kinds of datasources viz., dbf, tdatabase, ado (any rdbms), dolphin, tmysql, fw-mysql, postgre, eagle, etc. This enables the application programmer to write highly portable code. He can use exactly the same code with any of these datasources. We h...

... find no Sample for DBF does it have a "own" GET or does it use INKEY() or do i have to write my "own" Input-Box :?: --- i saw OrdWildSeek() using ::lSeekWild in METHOD RddIncrSeek() should i use   METHOD RddIncrSeek( cseek, uSeek ) instead of   METHOD Seek( cSeek ...

... on left Side if you have a FILTER to search "in String" like   "ABC" $ CUSTOMER->NAME you can Speed-Up when use Index and OrdWildSeek()   ORDSETFOCUS( "ALLETELNO" )   GO TOP   DO WHILE ORDWILDSEEK( "*" + ALLTRIM( cSeek ) + "*", ...

Thanks for the help Nages.

Perfect!

... FONT oFont   @ 20, 20 GET oGet VAR cSeek SIZE 300,26 PIXEL OF oDlg UPDATE   oGet:bChange := <||      if oRs:OrdWildSeek( "*" + Trim( oGet:oGet:buffer ) + "*" )         oBrw:Refresh()  ...

Hi Nages, Seeking for the next occurrence: Code: Select all Expand view nSaveRec := oRs:RecNo() oRs:Skip( 1 ) if oRs:OrdWildSeek( cSeek, .t. ) oBrw:Refresh() else oRs:GoTo( nSaveRec ) MsgInfo( "not found" endif Unfortunately it didn't work, the skip runs, but OrdWildSeek ...

Seeking for the first occurrence: if oRs:OrdWildSeek( cSeek )   oBrw:Refresh()else   MsgInfo( "not found" )endif Seeking for the next occurrence: nSaveRec := oRs:RecNo()oRs:Skip( ...

...   LOCAL cCHAVEPESQUISA := ""    cCHAVEPESQUISA:=(_oGetPesquisa:oGet:Buffer)       _oRS:ORDWILDSEEK("*"+ALLTRIM(cCHAVEPESQUISA)+"*",.F.)    _oBrwPESQUISA:REFRESH()    RETURN NIL  ********************************************************************************STATIC ...

Lo he resuelto utilizando ordwildseek(): function modificacampo()   local osay,oget,oDlg,i,oboton,oboton1,oini   local cfecha,cnombre,cimporte:=0,continua:=.F.   cfecha := CTOD ("01/01/"+Right(DtoC(Date()),2))  ...