Makroausführung in Impress im Präsentationsmodus angehalten?

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

MatthiasH
Beiträge: 1
Registriert: Mo, 23.08.2010 21:48

Makroausführung in Impress im Präsentationsmodus angehalten?

Beitrag von MatthiasH »

Hallo!

Ich muß bis Donnerstag eine Präsentation mit Impress erstellen, mit der ein Quiz in der Art von "Wer wird Millionär" gespielt werden kann. Ich habe nach langem verzweifeltem Suchen in diversen Foren folgende Routine erstellt, mit der ein Sechseck (über "Standardformen", "Sechseck" gezeichnet) zum Blinken gebracht werden kann, wenn man darauf klickt. In der Entwurfsansicht funktioniert auch alles wunderbar. Zu meinem Entsetzen passiert im Präsentationsmodus allerdings überhaupt nichts. Auch die (jetzt auskommentierte) messagebox erscheint nicht. Ich habe den Eindruck, als würde die Makroausführung im Päsentationsmodus angehalten. Kann das sein?

Code: Alles auswählen

Sub ToggleColor
	Dim oDoc As Object
	Dim oPage As Object
	Dim RectangleShape As Object

	oDoc = ThisComponent
	oPage = oDoc.DrawPages(0)
	RectangleShape = oPage.getByIndex(4)

   for i = 1 to 5
   	RectangleShape.FillColor = RGB(0, 255, 0)
   	wait 800
 '  	msgbox i & ". Durchlauf"
   	RectangleShape.FillColor = RGB(0, 0, 0)
   	wait 800
   next i
End Sub
Falls es doch eine Lösung geben sollte, wäre ich extrem dankbar, wenn Ihr mir auch noch Tips geben könntet, wie ich
  • den Inhalt eines Textfelds (gewonnene Summe) ändern kann (insbesondere: wie adressiere ich das Feld: geht "getByName"?)
  • eine Grafik (verbrauchte Joker) ausblenden kann
Meine Versuche unternehme ich übrigens in OpenOffice 3.2.1 unter Windows XP.

Vielen herzlichen Dank im Voraus - Matthias