Programmieren - alles kontrollieren 4.941 Themen, 20.715 Beiträge

Task ID in Visual Basic

Harrykoppi / 7 Antworten / Baumansicht Nickles

Hallo !

Mein Programm besteht aus immer gleichen Subs.
Das Programm startet eigentlich nur Spiele die
sich auc C:\Spiele befinden.

Hier ein Beispiel:

Private Sub Picture5_Click(Index As Integer)
Dim TaskID1 As Long
TaskID1 = Shell("c:\spiele\KONG\KONG.exe", vbNormalNoFocus)
AppActivate TaskID1
End Sub

Das funzt.
ABER:
Wenn ich eine andere Sub ausführe (TaskID2)
bekomme ich nach dem Beennden der exe immer die Meldung
"Run Time Error 5.......Invalid procedure call at argument"


Was mache ich falsch ????


Herzlichen Dank !Harry!

bei Antwort benachrichtigen
T-Rex Harrykoppi „Task ID in Visual Basic“
Optionen

Wie sieht denn die andere Sub aus?

 GrüßeT-Rex 
bei Antwort benachrichtigen
Harrykoppi T-Rex „Wie sieht denn die andere Sub aus?“
Optionen

Private Sub Picture6_Click(Index As Integer)
Dim TaskID2 As Long
TaskID2 = Shell("c:\spiele\breakout\breakout.exe", vbNormalNoFocus)
AppActivate TaskID2
End Sub
--------------------------------------------------------------------------------------------------------
Private Sub Picture7_Click(Index As Integer)
Dim TaskID3 As Long
TaskID3 = Shell("c:\spiele\snowman\snowman.exe", vbNormalNoFocus)
AppActivate TaskID3
End Sub

Die Bilder haben alle Index=0
u.s.w.

Grüße !Harry!


bei Antwort benachrichtigen
T-Rex Harrykoppi „Private Sub Picture6_Click Index As Integer Dim TaskID2 As Long TaskID2 Shell c:...“
Optionen

Es kann sein, daß die Anwendung noch nicht fertig geladen ist, wenn Du sie aktivieren möchtest.
Warum machst Du eigentlich NoFocus, aktivierst die Anwendung dann aber direkt?

 GrüßeT-Rex 
bei Antwort benachrichtigen
Harrykoppi T-Rex „Es kann sein, daß die Anwendung noch nicht fertig geladen ist, wenn Du sie...“
Optionen

Hallo !

Habe mal "vbNormalNoFocus" weggelassen.
funktioniert auch nicht bei allen spielen.
Beim deaktivieren dieser Funktion starte ich 4gewinnt
und es kommt nicht das ganze Window sondern nur ein Titelleiste......


Wie proggt man mein Vorhaben eigentlich richtig ?


Danke !Harry!

bei Antwort benachrichtigen
T-Rex Harrykoppi „Hallo ! Habe mal vbNormalNoFocus weggelassen. funktioniert auch nicht bei allen...“
Optionen

Was hast Du denn vor?

 GrüßeT-Rex 
bei Antwort benachrichtigen
Harrykoppi T-Rex „Was hast Du denn vor?“
Optionen

Eigentlich habe ich auf meiner FORM 20 Bilder die aus Screenshots hergestellt
und verkleinert wurden.

Klickt man auf eines der Spiele, wird die .exe gestartet. Fertig.Sonst nix.
Ich bekomme Fehler von Runtime-Error über fehlende Grafiken oder gar nicht
startende Programme.........bei dem Spiel so....und bei anderen eben anders.
Andere funzen wieder ganz normal......


Ich habe eigentlich schon aufgegeben.......alle Icons auf dem Desktop gelegt......


Danke !Harry!

bei Antwort benachrichtigen
T-Rex Harrykoppi „Eigentlich habe ich auf meiner FORM 20 Bilder die aus Screenshots hergestellt...“
Optionen
 GrüßeT-Rex 
bei Antwort benachrichtigen