Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
At click event work
Message
De
19/01/2005 07:29:23
 
 
À
19/01/2005 07:13:44
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 5
Divers
Thread ID:
00978332
Message ID:
00978479
Vues:
19
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform