Seite 1 von 4

Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 12:41
von Velindos
Hallo Leute,

mein Programm lief bis vor kurzen Einwandfrei! Jetzt bekomme ich beim beenden des Programm
den Fehler "Unerwartetes Beenden etc...!"

Grund dessen habe ich mein Font´s ausgeschaltet und siehe DA der Fehler kommt nicht mehr!

Zu den Fonts wäre zu erwähnen das ich Font mit
Global Font_Work_SearchFeld = LoadFont(#PB_Any, "Verdana",14, #PB_Font_HighQuality|#PB_Font_Bold))
DrawingFont(Font_Work_SearchFeld)
verwende. Nun habe ich nur diese eingschaltet und es kam wiederrum keine Meldung!

Weiters verwende ich Font´s für Gadget wie folgt!
SetGadgetFont(#Work_S_SearchWort,FontID(LoadFont(#PB_Any, "Verdana", 15, #PB_Font_HighQuality|#PB_Font_Bold)))
Wenn ich diese wieder einschalte, erscheind wieder der genannte Fehler!

Jemand einen TIP wie ich der Sacher her werde?

Gruss ... Velindos

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 13:12
von #NULL
DrawingFont(Font_Work_SearchFeld) --> DrawingFont(FontID(Font_Work_SearchFeld))

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 13:19
von Velindos
Hallo,
habe ich gemacht
DrawingFont(FontID(#Font_VelindosCuver))
bei allen Einträgen, ändert sich aber nichts!


Gruss ... Velindos!

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 13:23
von #NULL
Hast du geprüft was LoadFont() zurückgibt? Wenn ich mich richtig errinnere musste ich auch unter Windows immer lowercase Fontnamen angeben, zumindest bei den Fonts die ich verwendet habe.

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 13:30
von Velindos
Hallo,
was sind
lowercase Fontnamen
Gruss .. Velindos!

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 13:32
von #NULL
heißt, alles in Kleinbuchstaben. Also "verdana" statt "Verdana". Bin mir aber nicht sicher, hängt vielleicht auch vom jeweiligen Font ab.

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 14:33
von Kiffi
Velindos hat geschrieben:Weiters verwende ich Font´s für Gadget wie folgt!

Code: Alles auswählen

SetGadgetFont(#Work_S_SearchWort,FontID(LoadFont(#PB_Any, "Verdana", 15, #PB_Font_HighQuality|#PB_Font_Bold)))
... solltest Du nicht machen, denn somit wird für jedes Gadget ein LoadFont() durchgeführt. Besser:

Code: Alles auswählen

myFont = LoadFont(#PB_Any, ...)

If myFont
  SetGadgetFont(Gadget1, FontID(myFont))
  SetGadgetFont(Gadget2, FontID(myFont))
  SetGadgetFont(Gadget3, FontID(myFont))
EndIf
Grüße ... Peter

P.S.: Fonts, nicht Font´s.

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 15:14
von Velindos
Hallo,
Denke du liegst richtig. Habe bei Stringgadget und Listicongadget probleme!

Werde mal deinen Tip einbauen! Danke!

Zur
lowercase Fontnamen
habe ich gemacht, aber keine Veränderung erreicht - Danke!

Gruss ... Velindos!

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 18:56
von Velindos
Hallo,
nun habe ich einiges Eingetragen und habe noch immer den selben Effekt!

Also habe ich den selben Code im PB V5.62(x86) getestet. Hier kommt die Meldung nicht!
Wenn ich PB V5.62(x64) kommt der Fehler "Unerwartetes Beenden etc...!" wieder!

Auffallend war der Test das ich im PB V5.62(x64) beim Ändern der Fonts in die Vorschläge, letztlich das Programm nicht mehr starten konnte!

Jemand noch ne Tip, ich steh an!

Gruss ... Velindos!

Re: Unerwartetes Beenden etc...!

Verfasst: 30.07.2018 19:05
von STARGÅTE
Velindos hat geschrieben:Jemand noch ne Tip, ich steh an!
Poste doch ein mal einen (verkürzten) ausführbaren Code bei dem dieser Fehler auftritt, ansonten: Bild