Seite 1 von 1
Standard für Schriften
Verfasst: Sa 18. Mai 2013, 09:59
von Sephan
Wenn ich im Formular mir die Eigenschaften eines Kontrollfeldes anschaue, gibt es ja auch die Möglichkeit unter Schrift das Schriftbild anzupassen. Dazu habe ich zwei Fragen:
Wie kann man es wieder zurück auf "(Standard)" setzten und wo ist dieser Standard definiert? Scheinbar nicht in Formatvorlagen.
Re: Standard für Schriften
Verfasst: Sa 18. Mai 2013, 20:00
von F3K Total
Hallo Sephan
Sephan hat geschrieben:Wie kann man es wieder zurück auf "(Standard)" setzten
Ich konnte keine Standard-Möglichkeit finden, mit diesem Makro kann man z.B. die Beschriftungsfelder zurücksetzen. Dazu
- das Formular im Entwufsmodus öffnen.
- Das Makro über Extras/Makros ausführen.
- Man sieht zunächst keine Änderung.
- das Formular speichern, schliessen.
- das Formular wieder öffnen, fertig.
Code: Alles auswählen
SUB Reset_font
oDoc = thisComponent
oDrawpage = oDoc.drawpage
oForm = oDrawpage.forms.getByName("MainForm")
oformenumeration = oForm.createenumeration
while oformenumeration.hasmoreelements
ocontrol = oformenumeration.nextelement
if ocontrol.supportsservice("com.sun.star.form.component.FixedText") then
ocontrol.FontName = "" 'hier wird quasi nix eingetragen um den Standard wieder herzustellen.
endif
wend
End Sub
Sephan hat geschrieben:und wo ist dieser Standard definiert?
keine Ahnung ob überhaupt.
Viel Erfolg
Gruß R
Re: Standard für Schriften
Verfasst: Sa 18. Mai 2013, 23:02
von Sephan
Damit setzt er nur Beschriftungsfelder zurück, oder? Jedenfalls hat es Textfelder oder Buttons nicht zurückgesetzt.
Re: Standard für Schriften
Verfasst: Sa 18. Mai 2013, 23:03
von F3K Total
F3K Total hat geschrieben:mit diesem Makro kann man z.B. die Beschriftungsfelder zurücksetzen
Genau!
Re: Standard für Schriften
Verfasst: Sa 18. Mai 2013, 23:39
von Sephan
Ist das dieses FixedText?
Re: Standard für Schriften
Verfasst: Sa 18. Mai 2013, 23:44
von F3K Total
Jepp,
wenn du die Abfrage wegläßt, werden alle Kontrollelemente gefunden.
Re: Standard für Schriften
Verfasst: So 19. Mai 2013, 00:03
von Sephan
Ah, und ich dacht schon, ich müsste mich durchs Handbuch wühlen um alle Namen für die Elemente zu finden
Wenn ich aber die if Abfrage weglasse und den Inhalt davon drin beschwert er sich:
Eigenschaft oder Methode nicht gefunden: drawpage
Re: Standard für Schriften
Verfasst: So 19. Mai 2013, 00:05
von F3K Total
F3K Total hat geschrieben:- Das Makro über Extras/Makros ausführen.
hatte ich geschrieben, oder?
Re: Standard für Schriften
Verfasst: So 19. Mai 2013, 00:34
von Sephan
Äh, frag mich nicht was ich gemacht habe. Ich befürchte es war mehr als dämlich
Jedenfalls, es geht. Vielen Dank

Re: Standard für Schriften
Verfasst: So 19. Mai 2013, 00:49
von F3K Total
Sephan hat geschrieben:Ah, und ich dacht schon, ich müsste mich durchs Handbuch wühlen um alle Namen für die Elemente zu finden
Wäre nicht nötig, ich habe das mit
Xray herausgefunden. Kann ja sein, dass eben nicht alle geändert werden sollen.
Gruß R