Re: [de-users] [Erledigt] Makro gesucht Drehen Draw
Hi Robert > Am 28.02.2014 um 16:02 schrieb Robert Großkopf : > > Hallo Florian, >> >> Die Zeile "oShape.RotateAngle = 720 * (i+1)" werde ich nie verstehen >> (Wegen 720 als 7,2 Grad). > > habe ich auch nur bei Thomas Krumbein abgeguckt. Du kannst die > Grad-Angabe so zwar in ganzen Zahlen angeben, definierst aber eigentlich > die Hundertstel. Genau das ,meinte ich, ist IMHO ein Bug (i+1) ist mir als Programmierer (nein, nicht LibO Basic ;) ) klar, danke Trotzdem :D > * (i+1) → das soll dafür sorgen, dass in der Schleife die Drehung immer > größer wird. Ich habe das erst ohne probiert, da ich dachte: Das Objekt > ist ja nach dem ersten Mal bereits 7,2° gedreht. Anscheinend wird aber > immer vom Ursprungsobjekt ausgegangen. Dann musst Du natürlich den Wert > entsprechend mit der Schleife mit vergrößern. > > Gruß > > Robert > Liebe Grüße, / Yours, Florian Reisinger > -- > Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org > Probleme? > http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/ > Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de > Listenarchiv: http://listarchives.libreoffice.org/de/users/ > Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert -- Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/ Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de Listenarchiv: http://listarchives.libreoffice.org/de/users/ Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
Re: [de-users] [Erledigt] Makro gesucht Drehen Draw
Ohne mich da jetzt einmischen zu wollen, aber vernünftige Programmiersprachen haben auch eine vernünftige Bibliothek, um mit Bildern arbeiten zu können. Ich nehme mal an, dass du die Bilder irgendwie per Screenshot aus dem Programm entnimmst und dann in einem Ordner ablegst, um darauf in deinem Spiel zurückgreifen zu können -> wahrscheinlich würde ich die Einheit einmal definieren und dann per Laufzeit im Programm drehen und positionieren, wo ich die haben will... Nur am Rande: Mal mit Python gearbeitet? Da gibt es PIL und Pygame, die man sich ansehen kann. Das ginge da m. E. flott und zügig und unkompliziert... BG Michael Am 28. Februar 2014 16:02 schrieb Robert Großkopf < rob...@familiegrosskopf.de>: > Hallo Florian, > > > > Die Zeile "oShape.RotateAngle = 720 * (i+1)" werde ich nie verstehen > (Wegen 720 als 7,2 Grad). > > habe ich auch nur bei Thomas Krumbein abgeguckt. Du kannst die > Grad-Angabe so zwar in ganzen Zahlen angeben, definierst aber eigentlich > die Hundertstel. > * (i+1) → das soll dafür sorgen, dass in der Schleife die Drehung immer > größer wird. Ich habe das erst ohne probiert, da ich dachte: Das Objekt > ist ja nach dem ersten Mal bereits 7,2° gedreht. Anscheinend wird aber > immer vom Ursprungsobjekt ausgegangen. Dann musst Du natürlich den Wert > entsprechend mit der Schleife mit vergrößern. > > Gruß > > Robert > > -- > Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org > Probleme? > http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/ > Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de > Listenarchiv: http://listarchives.libreoffice.org/de/users/ > Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert > -- Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/ Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de Listenarchiv: http://listarchives.libreoffice.org/de/users/ Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
Re: [de-users] [Erledigt] Makro gesucht Drehen Draw
Hallo Florian, > > Die Zeile "oShape.RotateAngle = 720 * (i+1)" werde ich nie verstehen > (Wegen 720 als 7,2 Grad). habe ich auch nur bei Thomas Krumbein abgeguckt. Du kannst die Grad-Angabe so zwar in ganzen Zahlen angeben, definierst aber eigentlich die Hundertstel. * (i+1) → das soll dafür sorgen, dass in der Schleife die Drehung immer größer wird. Ich habe das erst ohne probiert, da ich dachte: Das Objekt ist ja nach dem ersten Mal bereits 7,2° gedreht. Anscheinend wird aber immer vom Ursprungsobjekt ausgegangen. Dann musst Du natürlich den Wert entsprechend mit der Schleife mit vergrößern. Gruß Robert -- Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/ Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de Listenarchiv: http://listarchives.libreoffice.org/de/users/ Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
Re: [de-users] [Erledigt] Makro gesucht Drehen Draw
Hallo Robert,
Danke!
Hat toll funktioniert!
Die Zeile "oShape.RotateAngle = 720 * (i+1)" werde ich nie verstehen (Wegen
720 als 7,2 Grad).
Liebe Grüße, / Yours,
Florian Reisinger
> Am 27.02.2014 um 22:20 schrieb Robert Großkopf :
>
> Hallo Florian,
>>
>> 1) Neue Seite erstellen (Vorherige Kopieren) 2) Alle Elemente um (bei
>> mir jetzt, wäre nett wenn man das als Schritt 0 einstellen könnte)
>> -7,2° drehen (Zentrum Mitte des Objekts, da das gleichzeitig die
>> Mitte der Seite ist) [Um mehr Fälle abzudecken wäre es auch nett die
>> Anzahl der Drehungen abzufragen]
>
> Ich mache so etwas zwar auch nur per Trial and Error, aber der Folgende
> Code macht mir bei einem Rechteck auf der Seite (oder eben bei nur einem
> Objekt) lauter neue Seiten, bei denen das Ganze schrittweise gedreht wird.
>
> SUB NeueSeite
>DIM oDoc AS OBJECT
>DIM oSeiten AS OBJECT
>DIM oSeite AS OBJECT
>DIM oShape AS OBJECT
>DIM inZahl AS INTEGER
>oDoc = ThisComponent
>oSeiten = oDoc.getDrawPages()
>inZahl = InputBox("Wie viele neue Seiten sollen's sein?")
>inZahl = inZahl -1
>FOR i = 0 TO inZahl
>oDoc.duplicate(oSeiten.getByIndex(i))
>oSeite = oSeiten.getByIndex(i+1)
>oShape = oSeite.getByIndex(0)
>oShape.RotateAngle = 720 * (i+1)
>NEXT
> END SUB
>
> Gruß
>
> Robert
>
> --
> Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
> Probleme?
> http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
> Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
> Listenarchiv: http://listarchives.libreoffice.org/de/users/
> Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme?
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
