"&" in Windows Fenstern

Little Progger · Beitrag von **Little Progger** » 23.08.2013 01:16

Hallo liebe Community!
Baue grad ein Projekt für die Schule und benutze dafür das Windows GUI und dementsprechend auch die ganzen Gadgets.
Jetzt ist mir aufgefallen, dass ich z.B. mit einem Textgadget kein "&" darstellen kann. Stattdessen wird der erste Buchstabe unterstrichen.

Nun meine Fragen:
1. Gibt es eine Möglichkeit (und davon geh ich eigentlich aus), auch ein "&" darzustellen?
2. Gibt es noch andere Möglichkeiten einen Textabschnitt z.B. fett zu schreiben, mit Hilfe solcher Zeichen? (Wär doch praktisch!

)

danke schonmal fürs durchlesen!

STARGÅTE · Beitrag von **STARGÅTE** » 23.08.2013 02:27

Little Progger hat geschrieben:1. Gibt es eine Möglichkeit (und davon geh ich eigentlich aus), auch ein "&" darzustellen?

Ja, einfach && schreiben, das wird zu einem & gewandelt.

Little Progger hat geschrieben:2. Gibt es noch andere Möglichkeiten einen Textabschnitt z.B. fett zu schreiben, mit Hilfe solcher Zeichen? (Wär doch praktisch!)

Nein, weil das & kein stilistisches Mittel ist, sondern für Menü-Shortcuts gedacht ist.
Dort ist dann bei Datei und Speichern das D und S unterstrichen, um zu zeigen, dass man mit Alt, D, S speichern kann.

Beitrag von **bobobo** » 23.08.2013 14:30

Um dicke Schrift in einem Gadget zu bewerkstelligen gibt es
SetGadgetfont(...)
Tip ! Loadfont(..) geht auch ohne Angabe des Fontnamens

Code: Alles auswählen

duenn=LoadFont(#PB_Any,"",12)
dick=LoadFont(#PB_Any,"",12,#PB_Font_Bold)
fenschdr=OpenWindow(#PB_Any,0,0,200,200,"mei Fenschdr..",#PB_Window_ScreenCentered)
SetGadgetFont(#PB_Default,FontID(duenn))
text1=TextGadget(#PB_Any,0,0,200,20,"degs&&&chd oins")
SetGadgetFont(#PB_Default,FontID(dick))
text2=TextGadget(#PB_Any,0,20,200,20,"degschd zwoi")
Repeat
Until WaitWindowEvent()=#PB_Event_CloseWindow

Wie bekomme ich denn ein unterstrichenes &-Zeichen hin???
&&& mag so nicht gehen

Beitrag von **NicTheQuick** » 23.08.2013 14:33

Als Hinweis zwischendurch. Unter Linux wird da übrigens nichts unterstrichen, wenn man ein & davor setzt.

Ich weiß aber auch nicht wie das sonst geht.

Beitrag von **bobobo** » 23.08.2013 14:37

Schonmal ALT gedrückt ???
Oftmals werden die Underscores erst dann angezeigt.

Beitrag von **NicTheQuick** » 23.08.2013 14:44

bobobo hat geschrieben:Schonmal ALT gedrückt ???
Oftmals werden die Underscores erst dann angezeigt.

Daran liegt es nicht. Es wird einfach das & ausgegeben.

Beitrag von **bobobo** » 23.08.2013 14:57

ist da wohl ne Sache des Fenstermanagers ... ich mach da 'ne Grätsche

Little Progger · Beitrag von **Little Progger** » 23.08.2013 15:45

STARGÅTE hat geschrieben: Ja, einfach && schreiben, das wird zu einem & gewandelt.

Cool, danke, das hat funktioniert.

bobobo hat geschrieben:Um dicke Schrift in einem Gadget zu bewerkstelligen gibt es
SetGadgetfont(...)

Hm, ok das ist klar. Aber wenn ich z.B. in einem ganzen Textblock einzelne Wörter dick haben will, geht das doch irgendwie schlecht, weil ich die Koordinaten des Worts nicht herausfinden kann, da es ja z.B. durch nen Zeilenumbruch auch in Y Richtung verschoben wird. (Ich hoffe ihr versteht was ich meine.)
Letztendlich muss man da dann selbst ewig ne Prozedur schreiben, die dann die wörter an der Stelle die man haben will fett macht, wenns die Möglichkeit mit den Sonderzeichen nicht gibt, oder gibts da was einfaches?

Beitrag von **NicTheQuick** » 23.08.2013 16:04

Du kannst ein Editorgadget nehmen und das dann auf Read-Only stellen. Damit sollte man sowas ja machen können, obwohl ich damit selbst noch nie wirklich gearbeitet habe.

Beitrag von **Kiffi** » 23.08.2013 16:18

Achtung! Spatzenkanone!

Code: Alles auswählen

Procedure TextGadgetEx(Gadget, x, y, Width, Height, Text.s, Flags = 0)
  WebGadget(Gadget, x, y, Width, Height, "")
  SetGadgetItemText(Gadget, #PB_Web_HtmlCode, "<html><body style='margin:0;padding:0;background-color:#F0F0F0' scroll='no' onselectstart='return false'>" + Text + "</body></html>")
EndProcedure

If OpenWindow(0, 0, 0, 270, 160, "TextGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  TextGadgetEx(0, 10,  10, 250, 20, "TextGadget <b>bold</b>")
  TextGadgetEx(1, 10,  40, 250, 20, "TextGadget <u>underlined</u>")
  TextGadgetEx(2, 10,  70, 250, 20, "TextGadget <i>italic</i>")
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Grüße ... Kiffi

PureBoard

"&" in Windows Fenstern

"&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern

Re: "&" in Windows Fenstern