Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Puzzle: Works in FPW26, but how2 in VFP9?
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01326197
Message ID:
01326218
Views:
14
What exactly doesn't work? Do you get an error?
What's the problem with VFP debugger?

> I've got an old FPW26 app I'd like to simply recompile in VFP9 as the first step to conversion. Here's some code that displays to users a list of records, current and others, that when clicked on will change display to values of another record.
>
> This code works in FPW26, but not when run by VFP9. The FPW26 debugger will also trace properly BUT I can't get the VFP9 debugger to trace into it.
>
> I'd of course like to not change any code if possible and simply run in VFP9. Am I outta luck?
>
>Thanks,
>Steven-
>
>
>
>*-[Populate a 2dim array: text, numeric]----------------*
>laTxt[1,1]="First Text"
>laTxt[1,2]= nFirstRec
>laTxt[2,1]="Second Text"
>laTxt[2,2]= nSecondRec
>
>*-[Get mVars]-------------------------------------------*
>@<r>,<c> GET mVar1
>@<r>,<c> GET mVar2
>@<r>,<c> GET mVar3
>@<r>,<c> GET cTxt FROM laTxt  SIZE 4,18 FUNCTION '&N' DEFAULT <alias.cField> ;
>         VALID JumpToThisTXT(cTxt) ;
>         WHEN <something>=.T. ;
>         MESSAGE "[Dbl-Click] or [Enter] to display, [Tab] or [Ctrl+Tab] for next/previous field"
>
>READ
>
>
>
>*-------------------------------------------
>FUNCTION JumpToThisTXT
>PARAMETER jcTxt
>
>GO (laTxt[ASUBSCRIPT(laTxt, ASCAN(laTxt, jcTxt), 1), 2])
>SCATTER MEMVAR MEMO
>mVar1=<alias.c1>
>mVar2=<alias.c2>
>mVar3=<alias.c3>
>SHOW GETS ONLY
>
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform