I need to know how to disable a menu option after some parameters have been
saved?
EXAMPLE CODE:
Dim strout As TextOutputStream
Dim f As FolderItem
f = GetFolderItem("").Child("MyProgram_REG.ini")
If Name.text="" or KeyCode.text="" then
MsgBox("Please ENTER the Registration Name and/or the Registration Key
Code. Please press 'OK' to continue...")
Exit
End If
If KeyCode.text = registration.RegKeyCode then
// Save Registration Code
if f <> Nil then
strout = f.CreateTextFile
strout.WriteLine Name.text
strout.WriteLine KeyCode.text
strout.Close
MsgBox("The Registration has been saved. Please press 'OK' to
continue...")
Self.Close
// Disable Menu Options SendforRegistration and RegisterApplication
SendforRegistration.Enabled = False
RegisterApplication.Enabled = False
End If
Else
MsgBox("Please ENTER a Valid Registration Key Code Number. Please
press 'OK' to continue...")
End If
Ok, I have tried this a few times and it will not disable the Menu options
after a SAVE, but it will work if you EXIT then re-open the program. How do
I get the menu option to be disabled after I save the KeyCode, without
exiting and reopening the program?
Note, I have this on a few other save parameter options that it will only
work AFTER you Exit then re-open the program.
I need help on this one.
Jonathon
--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.371 / Virus Database: 267.14.18/230 - Release Date: 1/14/2006
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
