Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Inconsistent execution
Message
From
22/03/2001 10:26:27
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Inconsistent execution
Miscellaneous
Thread ID:
00487608
Message ID:
00487608
Views:
38
the following will run fine if i do right-click run from (after setting to
proc.. in command window), but gives "object not found error" if running the
exe.

it deletes a item from a listbox when you press the del key, the DeleteItem
holds the place where the delete code exits ( that way you can use a generic
trap for the delete key rather then XXX on key label functions to manage)

on init of listbox:
this.addProperty("DeleteItem", thisform.name + ".DelAccessg") && ok

on when of same listbox:
on key label DEL do DelItemlist && seems ok, calls the function

in proc file:
procedure delitemlist
PUSH KEY CLEAR
if PEMSTATUS(Application.ActiveForm.ActiveControl, "DeleteItem", 5)
*5 is 'does it exist?'. make it through here
private cStmt
cStmt = Application.ActiveForm.ActiveControl.DeleteItem
&cStmt && <----------------------------------- error occurs here
endif
POP KEY
endproc

thanks
- jer
Next
Reply
Map
View

Click here to load this message in the networking platform