Live Uhrzeit in Präsentation

Das Präsentationsgrafikprogramm

Moderator: Moderatoren

Hoelli86
Beiträge: 4
Registriert: Mo, 29.01.2007 15:13

Live Uhrzeit in Präsentation

Beitrag von Hoelli86 »

Hallo,
versuche schon seit einiger Zeit eine LIVE Uhrzeit in eine Impress Präsentation zu erstellen. Habe bis jetzt nur den Ansatz mit ->Einfügen->Feldbefehl->Uhrzeit(variable) gefunden jedoch wird dei Uhrzeit nicht ständig aktualisiert.

Hat jemand eine Idee wie man die aktuelle Uhrzeit in der Präsentation Ansatzweise realisieren könnte? Eventuell mit Makros?

Danke
Toxitom
********
Beiträge: 3769
Registriert: Di, 12.08.2003 18:07
Wohnort: Wiesbaden
Kontaktdaten:

Beitrag von Toxitom »

Hey Hoelli86,
Hat jemand eine Idee wie man die aktuelle Uhrzeit in der Präsentation Ansatzweise realisieren könnte? Eventuell mit Makros?
Sicher :-)

Geht aber wohl nur mit Makros. Hier ein kleines Beispiel:

Code: Alles auswählen

Sub Zeit_Anzeige
	oDrawPage = ThisComponent.getDrawPages(0)
	oMaster = oDrawPage.getByIndex(0).getMasterPage()'.getByIndex(0) 'Name("Feld1")
	n= 1
	do while n < 50
		for i = 0 to oMaster.count - 1
		   if oMaster.getByIndex(i).name = "Feld1" then 
		   	   oShape = oMaster.getByIndex(i)
		       oShape.string = time()
		       exit for
		   end if
		next
		wait(990)
		n = n + 1
	loop
End Sub
Damit es funktioniert, rufst du die Masterpage der ersten Seite auf, plazierst dort eine Autoform (ich habe ein Rechteck genommen - es spielt aber grundsatzlich keine rolle) und benennst dieses Objekt (Kontextmenü - Objekt benennen) - und zwar mit "Feld1". Schreib etwas in das Feld hinein, damit du acuh die Schrift formatieren kannst, was ist egal, wird sowieso überschrieben.
Das Makro macht nun folgendes: Es holt sich die Masterseite der ersten Folie, sucht dort nach einem Element mit Namen "Feld1" und schreibt dort dann die aktuelle Systemzeit rein. Dann wartet es 990 millisekunden und startet die Schleife erneut. Damit sie nicht endlos läuft, hab ich sie mal auf 50 Durchgänge begrenzt (n=50), also 50 Sekunden. Kannst du natürlich entsprechend "aufmotzen" oder auch mit Listener ausrüsten....
Eventuell musst du mit der Wait-Zeit ein wenig spielen, ja nachdem, das wievielte Objekt dein gesuchtes ist. Theoretisch könntest du die Wait-Zeit auch ganz weglassen - dann wird halt immer das passende Datum eingetragen - bis zu 1000 * pro Sekunde. Möglicherweise aber "hängt" dann dein PC.

So, das Makro könntest du mit Öffnen der Präsentation starten - dann läuft die Uhr :-)

Viele Grüße
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Toxitom
********
Beiträge: 3769
Registriert: Di, 12.08.2003 18:07
Wohnort: Wiesbaden
Kontaktdaten:

Beitrag von Toxitom »

Hey,

sorry, muss eine Korrektur anbringen: Es funktioniert offensichtlich nur im "normalen" Modus, nicht im Präsentationsmodus.

Dort ändert sich nix????

Entweder gibt es da einen Bug - oder ... zur Zeit keine Ahnung :oops:

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Toxitom
********
Beiträge: 3769
Registriert: Di, 12.08.2003 18:07
Wohnort: Wiesbaden
Kontaktdaten:

Beitrag von Toxitom »

Hey,

hab noch ein bischen gestöbert... Geht derzeit wirklich nicht. Ist als Problem bekannt, wird jedoch jetzt auch nicht bearbeitet.

Der bestehende Issue ( 48395 ) wurde gerade geschlossen :-(

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Hoelli86
Beiträge: 4
Registriert: Mo, 29.01.2007 15:13

Beitrag von Hoelli86 »

Danke, stimmt im "normalen" Modus funktioniert es einwandfrei. Eigentlich seltsam....
Hoelli86
Beiträge: 4
Registriert: Mo, 29.01.2007 15:13

Beitrag von Hoelli86 »

sorry hab ein bisschen zu spät gepostet okey danke
Hoelli86
Beiträge: 4
Registriert: Mo, 29.01.2007 15:13

Beitrag von Hoelli86 »

Würde das aber mit der Version 1.1 noch funktionieren oder?
Toxitom
********
Beiträge: 3769
Registriert: Di, 12.08.2003 18:07
Wohnort: Wiesbaden
Kontaktdaten:

Beitrag von Toxitom »

Würde das aber mit der Version 1.1 noch funktionieren oder?
Offensichtlich, so sagt es zumindest der Issue. Hab ich aber nicht getestet

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Antworten