Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
At click event work
Message
From
19/01/2005 07:29:23
 
 
To
19/01/2005 07:13:44
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 5
Miscellaneous
Thread ID:
00978332
Message ID:
00978479
Views:
20
hi,
yes i want to go to next a new, blank record.
thanks.
>To avoid confusion, and since I have not read all the messages: is the 'next' record a normal record, or do you want a new, blank record?
>
>>hi,
>>i use set step on and via step over, i see all steps works ,
>>and it make skip to next ,but when i stop set step on ,via brow it stay at the same record.
>>thanks
>>
>>>Add SET STEP ON and see what happens for each line.
>>>
>>>>hi,
>>>>i remove thisform.grid1.refresh(), but still ,no skip to next record,
>>>>but the same code it works via click .
>>>>
>>>>   m.a=thisform.timeadd(thisform.timeadd(thisform.timeadd(thisform.timeadd(true,hot),balanc),mint),other)
>>>>   m.w=thisform.timeadd(plan,("00:00:00"))
>>>>IF m.a=m.w and m.a>"00:00:00" and m.w>"00:00:00"
>>>>          =MessageBox("true")
>>>>          grdTable = thisform.Grid1.RecordSource
>>>>          thisform.Grid1.column7.SetFocus()
>>>>          SKIP IN (grdTable)
>>>>    IF EOF()
>>>>       SKIP -1 IN (grdTable)
>>>>    ENDIF
>>>>
>>>>ELSE
>>>>      =MessageBox("false")
>>>>      thisform.Grid1.column7.SetFocus()
>>>>ENDIF
>>>>
>>>>>You have to check the order in which things happens:
>>>>>IF m.a=m.w
>>>>>  =MessageBox("true")
>>>>>  grdTable = thisform.Grid1.RecordSource
>>>>>  SKIP IN (grdTable)&&¬hng happend
>>>>>  IF EOF(grdTable)
>>>>>     SKIP -1 IN (grdTable)
>>>>>   ENDIF
>>>>>   thisform.Grid1.column7.SetFocus()
>>>>>   thisform.Grid1.refresh() && I am not sure if this ine is necessary!
>>>>>
>>>>>ELSE
>>>>>
>>>>>   =MessageBox("false")
>>>>>
>>>>>ENDIF
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform