Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
At click event work
Message
From
19/01/2005 07:13:44
 
 
To
19/01/2005 07:08:22
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 5
Miscellaneous
Thread ID:
00978332
Message ID:
00978472
Views:
26
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