Form change when copying from one computer to a second computer

[adcooke]

Re: Form change when copying from one computer to a second computer

Sorry Tim, but after lots of trying - very trying, I can't figure out how to do the msgbox() thing

"Change the autoexec code to only get the machine name and display it in a msgbox()."
"Change the autoexec code to only display a form- first a form other than the two you have tried. then one of the two you do want."

Can you please let me know the required code.

many thanks
Arthur

[adcooke]

Re: Form change when copying from one computer to a second computer

If I run it from the code editor, it opens the specified form
Arthur

That is, after clicking on the icon, it opens up to the CP. Then clicking on the autoexec again, it opens the specified form. Hope that's what you mean or want to know

[MoGrace]

Re: Form change when copying from one computer to a second computer

From the interactive window access the variable page from the toolbar. Define your global variable 'machname' in the on initalize tab as

machname
= API_getmachinename()

Then in your autoexec try

Dim global machname as c
If "ADC" $ machname then
Form.view("your large form name here")
Else
Form.view("your small form name here")
End if

That will at least eliminate any double hyphen problem in the name. Do NOT change the machine name because your A5 license requires it.

[DaveM]

Re: Form change when copying from one computer to a second computer

Oddly, I just change the computer name and encountered no problem starting alpha. Of course I changed it back after the experiment.

[adcooke]

Re: Form change when copying from one computer to a second computer

Thank you Robin.

Did all that and worked well when run from the interactive window - ie it selected and opened desired form.

But when shut down and reopened from the icon or Programs>Alpha.exe, in both cases again only went to CP, not desired form????

Short of selecting manually, changing computer name is starting to look like the only option.

Arthur

[Tim Kiebert]

Re: Form change when copying from one computer to a second computer

If I run it from the code editor, it opens the specified form
Arthur

That is, after clicking on the icon, it opens up to the CP. Then clicking on the autoexec again, it opens the specified form. Hope that's what you mean or want to know

Below should get you the message box test working but the fact that the code opens the correct form from the code tab means the code itself is ok. The message box should confirm if the autoexec is firing ok at start up.

dim machname as c
machname = api_getmachinename()
msgbox(machname)

It is beggining to sound like there is some other setting amiss somewhere.

[DaveM]

Re: Form change when copying from one computer to a second computer

How are you spelling autoexec?
Full name please?
Other: Are you sure the settings are made to run autoexec on startup? I know you indicated so.
There is a setting to run a form on start in the settings also, what is that set to??

[Tim Kiebert]

Re: Form change when copying from one computer to a second computer

How are you spelling autoexec?
Full name please?

I was about to ask the same question.

[adcooke]

Re: Form change when copying from one computer to a second computer

Tim and Bave

Definitely spelt A U T O E X E C (all in lower case, no spaces, and nothing after autoexec).

Settings>Autoexec Script>Execute the Autoexec Script - definitely set to YES

Startup Form>Display Startup Form> was set to YES ( I thought I had reset this to NO previously, but apparently not). So reset this to "NO", but again made no difference - starting via icon or All Programs>Alpha.exe - still goes straight to CP

Reset to Dave's autoexec with above resets, but still opens to CP
Reset to Tim's autoexec with above resets, but still opens to CP

Checked Startup>Default Control Panel Prompt> was set at YES, reset to NO - again made no difference - still opens to CP

Will now try Tim's msgbox routine, as now have code - sincere thanks again Tim & Dave.

Arthur

[adcooke]

Re: Form change when copying from one computer to a second computer

Reset autoexec to Tim's version, just to eliminate the double hyphen problem as he suggested.

Got Tim's msgbox working fine - definitely showed the correct machine/computer name - ADC-TOSHIBA-PC

Then checked Workplace Properties Library Tab as Tim suggested in Msg 41

"Check in the workspace properties library tab that there is only one library listed. Sometimes when copies are made there is still reference to a library(.alb file) in another folder. which may result in the wrong autoexec running".

Found only one .abl file listed, with correct database name.

Also tried Tim's further suggestion to to get it to open a third form

"Change the autoexec code to only display a form- first a form other than the two you have tried. then one of the two you do want".

It opened a third form fine when run from the interactive window, but again not after shutdown and restart via icon of Alpha.exe - still went to CP


So where to from here - this is crazy?? You guys have done immense work - but are we reaching the end, and have to change computer names to eliminate all hyphens, and all that implies with licencing at Alpha???

Arthur

[Ray in Capetown]

Re: Form change when copying from one computer to a second computer

I would debug autoexec to see how far it gets before dropping out (probable that's what it is doing)
and check the values at each line as it executes

[preston2]

Re: Form change when copying from one computer to a second computer

To expand on what mograce stated, put this as the last thing in your autoexec script.

'Open startup form
form.view("FormName","","","","","")
a5.window_title = "Your app Title"
a5.icon = A5.Get_Master_Path() + "\Your.ico"
a5.splash = A5.Get_Master_Path() + "\YourSplash.png"
'Hide the Control Panel.
:controlpanel.hide()


The a5.window_title, a5.icon and a5.splash are optional.



Using something similar with your autoexec would be like this.

'Date Created: 08-Nov-2014 03:25:37 PM
'Last Updated: 09-Nov-2014 01:01:07 PM
'Created By : ADC
'Updated By : ADC

'Set variables
dim global vc_startform as c
dim global machname as c

'Get Machine Name
machname = API_GETMACHINENAME()

'Set startup form
if machname = "ADC-TOSHIBA-PC" then
vc_startform = "CWSmall Clnt Simple set"
else
vc_startform = "CWSmall set for eMachine"
end if

'Open startup form
form.view(vc_startform,"","","","","")
'Hide the Control Panel.
:controlpanel.hide()

[DaveM]

Re: Form change when copying from one computer to a second computer

I have display startup form set to yes in settings/system/preferences/startupform

I have default control panen set to yes in settings/system/preferences/startup


I can start the app by clicking the adb, through the alpha5.exe normal start up and choose the app or from an icon on the desktop. It always starts my dotimes form. If I insert the above, it will choose the appropriate form according to the computer.

See if you can best dupe what I have with your stuff.

A small app I have - autoexec.

a5.Maximize()
controlpanel.Maximize()
form.view("dotimes")

this is all that is in it.

adxxxxx1.jpg

This is a space where I test stuff.

[MoGrace]

Re: Form change when copying from one computer to a second computer

Hi Arthur,
Have you actually created the script and named it Autoexec? Not trying to be sassy, just checking...

[Mike Wilson]

Re: Form change when copying from one computer to a second computer

I think a screenshot of your code tab on the control panel would satisfy Robin's question.