So habs jetzt so einigermaßen gelöst.... nachdem ich mich auf der mailingliste eingetragen habe:
1. Im Designer funktionierts nicht, da muß erst die komplette Folie aufgebaut sein, den Aufbau kann ich nicht unterbrechen
2. Unter Hollywood 4.0 gehts auch nicht..
3. Unter Hollywood 4.5 geht dann in etwa so:
Einen Button im Designer definieren (d.h. mit Mausaktion belegen). Im Hollywoodcode dann den Bereich wo ShowLayer(.....) und die wait(...) Aufrufe kommen umprogrammieren.
a) Alle ShowLayer Aufrufe in einer Schleife abarbeiten, d.h. einen Zähler laufen lassen und je nach Zählerstand entsprechendes Objekt einblenden... danach kurz abfragen ob eine Mausklick auf den Button stattgefunden hat. Dies geht mit der neuen ("alten") Funktion "CheckEvent()" - War ein Event, dann macht Sie dass was im Button an Code hinterlegt ist (hier durch den Designer = nächste Seite. Damit die Abarbeitung der Repeatschleife nicht so schnell geht noch ein WaitTimer einbauen.
Für die die lieber "Code" lesen:
MakeButton(1, #LAYERBUTTON, 1, 0, 1, {
OnMouseDown = Function()
nextpage = 3
Return
EndFunction})
EndSelect
DisplayBGPic(1)
ShowLayer(3)
/* vorheriger code:
Wait(1000, #MILLISECONDS)
ShowLayer(4)
Wait(2000, #MILLISECONDS)
ShowLayer(5)
Wait(3000, #MILLISECONDS)
ShowLayer(6)
Wait(4000, #MILLISECONDS)
ShowLayer(7)
nextpage = 0
Repeat
WaitEvent
Until nextpage > 0
Return(nextpage)
* bis hier vom Designer.../
mytimer = 0
nextpage = 0
Repeat
StartTimer(1)
mytimer=mytimer+1
If mytimer=50
ShowLayer(4)
ElseIf mytimer=150
ShowLayer(5)
ElseIf mytimer=300
ShowLayer(6)
ElseIf mytimer=500
ShowLayer(7)
ElseIf mytimer=650
nextpage = 2 /* If skip is not pushed, Then continues To page 2 automatically */
EndIf
CheckEvent() /* To check If button have been clicked */
WaitTimer(1,20) /* 50 frames per second */
Until nextpage > 0
Return(nextpage)
EndFunction
Gruß Gero