Avatar billede tballe Nybegynder
02. december 2003 - 11:49 Der er 8 kommentarer og
1 løsning

Problemer med windows størrelse ved installationsprogram

Hej er der nogen der kan hjælpe med et iriteredne problem jeg har.
Jeg er igang med at skrive et valgprogram, hvor der kan vælges mellem tre forskellige installationer.
Det er i forbindelse med den sidste installation jeg har problemer. (Option3) Her drejer det sig om en Runtime installation til MS Access det der sker, er at istallationen starter men går i dvale på menulinienen og vil ikke komme videre. Det jeg så vil  er at maximere installationsbilledet. Den kodelinie jeg har forsøgt mig med virker ikke. Selv om det er den som Api'en selv automatisk foreslår, dog med den forskel, at det som default skal være minimeret. Er der en der har en ide?

Hilsen Tballe



Private Sub Button1_Click()
If Option1.Value = False And Option2.Value _
= False And Option3.Value = False Then
MsgBox "Der skal vælges en Access version for at installtionen kan starte"
End If

If Option1.Value = True Then
Shell ("Pakke1\Arki97.exe") ' Åbner programmet fra CD-R'en

End If

If Option2.Value = True Then
Shell ("Pakke2\Arki2000.exe")
End If

If Option3.Value = True Then
Shell("setup.exe", WindowStyle As VbAppWinStyle = VbNomalFocus) As Double
End If
Unload Me
End Sub
Avatar billede kabbak Professor
02. december 2003 - 11:55 #1
er du sikker på at den kalder den rigtige ("setup.exe"), der er jo en i windows, som kaldes fra dosprompten.
Avatar billede tballe Nybegynder
02. december 2003 - 12:13 #2
Skulle måske lige bemærke, at hvis jeg kører det pågældende setup.exe uafhængigt af mit valgprogram er der ingen problemer.

Tballe
Avatar billede kabbak Professor
02. december 2003 - 12:33 #3
Shell("\setup.exe", WindowStyle As VbAppWinStyle = VbNomalFocus) As Double

tilføjet \ , så er setup.exe i roden af drevet
Avatar billede tballe Nybegynder
02. december 2003 - 13:02 #4
Det er ikke det som er problemet. Den er kodelininen som er forkert.
Hvis jeg skriver Shell("setup.exe") Finder den Installationsprogrammet og starter installationen, men ligger det i dvale i værktøjslininen. Det er det der problemet, jeg vil have installationsprogrammet til at blive aktivt. Hvis jeg vækker det går i gang og bliver normal størrelse. Jeg skal da også lige indskyde, at hvis jeg starter uden om mit valgprogram. Starter installationsprogrammet normalt.
Hilsen Tballe
Avatar billede kabbak Professor
02. december 2003 - 14:43 #5
If Option3.Value = True Then
MyAppID = Shell("setup.exe", 1)
AppActivate MyAppID
End If

prøv den
Avatar billede kabbak Professor
02. december 2003 - 14:50 #6
MyAppID  = Shell("C:\WINDOWS\CALC.EXE", 1)  ' Run Calculator.
Syntax

Shell(pathname[,windowstyle])

The Shell function syntax has thesenamed arguments:

Part Description
pathname Required; Variant (String). Name of the program to execute and any requiredarguments orcommand-line switches; may include directory or folder and drive.
windowstyle Optional. Variant (Integer) corresponding to the style of the window in which the program is to be run. If windowstyle is omitted, the program is started minimized with focus.


The windowstyle named argument has these values:

Constant Value Description
vbHide 0 Window is hidden and focus is passed to the hidden window. 
vbNormalFocus 1 Window has focus and is restored to its original size and position.
vbMinimizedFocus 2 Window is displayed as an icon with focus.
vbMaximizedFocus 3 Window is maximized with focus.
vbNormalNoFocus 4 Window is restored to its most recent size and position. The currently active window remains active.
vbMinimizedNoFocus 6 Window is displayed as an icon. The currently active window remains active
Avatar billede tballe Nybegynder
02. december 2003 - 15:10 #7
Hej Kabbak

Det virker, og jeg kan se du er ved at give mig en foklaring i tilgift.
Det er bare fint.
Du skal have tak for hjælpen og du  fortjener dine 50 p.
Hilsen Tballe
Avatar billede tballe Nybegynder
02. december 2003 - 15:11 #8
Så  er det bare at du  svarer så du kan få Point's

Hilsen Tballe
Avatar billede kabbak Professor
02. december 2003 - 15:12 #9
et svar ;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester