What I was struggling with is using the SELECT [view] correctly. When I
click the page tab I had put my SELECT on the INIT instead of the CLICK
EVENT... Problem solved...
Here are the three buttons with two text boxes ...it works pretty good
[cSearchStr] FIRST NEXT COUNT [nMatch]
* first
cSearchStr = UPPER(ALLTRIM(cSearchStr))
IF cSearchStr > ' '
GOTO TOP
LOCATE FOR cSearchStr $ movbyloc.title
THISFORM.PAGEFRAME1.PAGE4.GRID1.SETFOCUS()
THISFORM.PAGEFRAME1.PAGE4.REFRESH
ENDIF
*next
cSearchStr = UPPER(ALLTRIM(cSearchStr))
IF NOT EOF()
SKIP
nCurRec = RECNO()
DO WHILE NOT (cSearchStr $ songsbyloca.title)
IF NOT EOF()
SKIP
ELSE
WAIT WINDOW "No more matches" NOWAIT
EXIT
ENDIF
ENDDO
ENDIF
THISFORM.PAGEFRAME1.PAGE3.GRID1.SETFOCUS()
THISFORM.REFRESH
* count
GOTO TOP
nMatch = 0
nCurRec = RECNO()
cSearchStr = UPPER(ALLTRIM(cSearchStr))
SCAN
IF (cSearchStr $ songsbyloca.title)
nMatch = nMatch + 1
IF nMatch = 1
nCurRec = RECNO()
ENDIF
ENDIF
ENDSCAN
IF nCurRec > 0
GOTO nCurRec
ENDIF
THISFORM.PAGEFRAME1.PAGE3.GRID1.SETFOCUS()
THISFORM.PAGEFRAME1.PAGE3.REFRESH
-----Original Message-----
From: Alan Bourke [mailto:[email protected]]
Sent: Saturday, February 20, 2010 3:38 AM
To: [email protected]; [email protected]
Subject: Re: Rookie needs next step
Where are the search buttons exactly Gary ?
--
Alan Bourke
alanpbourke (at) fastmail (dot) fm
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/26816738c4824c15832ae18983f79...@livingroom
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
