Seite 1 von 1
Schriftart für Liederbuchnummer
Verfasst: Do Jan 10, 2008 5:56 pm
von Hawkzfan
Hi @ SongBeamer Support und den Rest,
die Frage bzgl. der Formatierung der Liederbuchnummern wurde ja schon viel geschrieben. Ich verstehe auch die Problematik, nur kann ich diese für die Schriftart nicht nachvollziehen. Deswegen dacht ich mir, ich spreche dieses nochmal an, weil ich glaube dass das Einstellen der Schriftart irgendwie untergegangen ist.
Anderer Vorschlag bzgl. Liederbuchnummer: Ihr könntet die Liederbuchnummer auch in den Titel setzen.
Zum Beispiel: Liedtitel (Liederbuchnummer)
Danke für eure Aufmersamkeit und Hilfe
keep on checking
Hawkzfan
Verfasst: Do Jan 10, 2008 10:50 pm
von Sebastian
Das Problem der Schriftformatierung der Liedernummer ist, daß jede zusätzliche Schriftauswahlbox in den Optionen die Startzeit von SongBeamer spürbar verzögert (Wir haben dort schon ziemlich optimiert... und einige Sekunden herausgeholt. Das Problem liegt da jetzt aber eher bei Windows.)
Was ich als Kompromiß anbieten kann ist eine Einstellmöglichkeit per SongBeamer-Script.
Einfach die folgende Zeile im Scripteditor einfügen und ausführen. Vorher sollte man noch die gewünschte Schriftart zwischen die '...' setzen.
bzw. zum Zurücksetzen:
Diese Einstellung bleibt auch nach einem Neustart von SongBeamer erhalten. Benötigt wird mindestens die kommende Version 2.51c.
Verfasst: Fr Feb 01, 2008 8:05 pm
von Hawkzfan
Hallo!
Danke @ Sebastian für die Möglichkeit!
Könntest du aber bitte noch genauer erklären, wie das nun funktioniert? Denn meine Versuche scheitern immernoch (naja, einmal blöd immer blöd

)
keep on checking
Hawkzfan
Verfasst: Fr Feb 01, 2008 8:39 pm
von Sebastian
Also in SongBeamer: Extras->Makros
Dann das folgende Programm eingeben (oder besser in die Zwischenablage kopieren, abschreiben wäre etwas mühsam):
Code: Alles auswählen
uses
Forms, Buttons, StdCtrls;
var
C: TComboBox;
F: TForm;
L: TLabel;
btnOk: TBitBtn;
btnCancel: TBitBtn;
begin
F := TForm.Create(nil);
try
F.Position := poMainFormCenter;
F.BorderStyle := bsDialog;
L := TLabel.Create(F);
L.Parent := F;
L.Left := 10;
L.Top := 10;
L.Caption := 'Schriftart für Liederbuchnummer wählen: ';
F.Height := 170;
F.Width := 290;
btnOk := TBitBtn.Create(F);
btnOk.Parent := F;
btnOk.Caption := 'Ok';
btnOk.Kind := bkOk;
btnOk.SetBounds(80, 100, 90, 25);
btnCancel := TBitBtn.Create(F);
btnCancel.Parent := F;
btnCancel.Caption := 'Abbrechen';
btnCancel.SetBounds(180, 100, 90, 25);
btnCancel.Kind := bkCancel;
C := TComboBox.Create(F);
C.Parent := F;
C.SetBounds(10, 30, 260, 21);
C.Style := csDropDownList;
C.Items.Assign(Screen.Fonts);
C.Items.Add(''); // Leerer Eintrag = Standard verwenden
C.Sorted := True;
C.ItemIndex := C.Items.IndexOf(IniSFS.Song.ChurchSongID_FontName);
if F.ShowModal = mrOk then
begin
IniSFS.Song.ChurchSongID_FontName := C.Text;
Reload;
end;
finally
F.Free;
end;
end;
Dann F9 drücken um das Makro zu starten.
Verfasst: Fr Feb 01, 2008 10:33 pm
von Christian Barz
Hi Sebastian,
ich habe beim ausführen des Scriptes die Fehlermeldung bekommen:
“Property “IniSFS“ not found“
Module: “main“
Linenumber: “42“
Line:“ C.ItemIndex:=
C.Items.IndexOf(IniSFS.Song.ChurchSongID_FontName); “
Verfasst: Fr Feb 01, 2008 10:34 pm
von Sebastian
Christian Barz hat geschrieben:ich habe beim ausführen des Scriptes die Fehlermeldung bekommen:
Dann solltest du mal die aktuelle Version von SongBeamer installieren

Verfasst: Fr Feb 01, 2008 10:44 pm
von Christian Barz
Hi,
ich habe die Version 2.50, da erscheint die Fehlermeldung.
Brauche ich die 2.51c Version?
Wenn ja welcher Link?
Verfasst: Fr Feb 01, 2008 10:47 pm
von Sebastian
Christian Barz hat geschrieben:Brauche ich die 2.51c Version?
Wenn ja welcher Link?
Der Link ist eigentlich immer derselbe:
http://www.songbeamer.de/bin/SongBeamer ... _Forum.exe
Verfasst: Fr Feb 01, 2008 10:53 pm
von Christian Barz
Hi Sebastian,
hatte auch den Link aufgerufen, jedoch hat mein Downloadmanager was durcheinander gebracht.
Habe jetzt das Update ganz normal runter geladen, der Script läuft bestens.
DANKE