Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Using PROGRAM()
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00391698
Message ID:
00391761
Vues:
12
>Can anyone suggest some simple code for getting WAIT WINDOW or MESSAGEBOX() values within a method for showing the last two or three methods called?

James,

Like this:
LOCAL lnlast, lnstart, lni, lcresult
lnlast = PROGRAM(-1)
IF lnlast > 3
  lnstart = lnlast - 2
ELSE
  lnstart = 1
ENDIF
lcresult = ""
FOR lni = lnlast TO lnstart STEP -1
  lcresult = lcresult + PROGRAM(lni) + CHR(13)
NEXT
= MESSAGEBOX(lcresult, 64, "Trace")
George

Ubi caritas et amor, deus ibi est
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform