- Offizieller Beitrag
Hi,
ab und zu braucht man ja ein paar Unicode-Symbole.
Bisher habe ich dann meist Word geöffnet und aus der Symboltabelle rausgesucht.
Hier habe ich mal eine kleine Oberfläche gebastelt mit Symbolbeschreibung und Symbolanzeige für ein paar gängige Symbole. Symbol oder der Codewert läßt sich kopieren.
Spoiler anzeigen
#Region - TimeStamp
; 2013-01-16 22:47:12 v 0.1
#EndRegion - TimeStamp
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiListBox.au3>
Global $aUniCode[101][2] = [ _
["Kleiner Kreis",8226], _
["Drei Punkte",8230], _
["Hoch-Strich",8242], _
["Hoch-Striche",8243], _
["Pfeil links",8592], _
["Pfeil hoch",8593], _
["Pfeil rechts",8594], _
["Pfeil runter",8595], _
["Pfeil links-rechts",8596], _
["Pfeil runter",8629], _
["Pfeil links",8656], _
["Pfeil hoch",8657], _
["Pfeil rechts",8658], _
["Pfeil runter",8659], _
["Pfeil links-rechts",8660], _
["All-Quantor",8704], _
["Teil-Quantor",8706], _
["Einige-Quantor",8707], _
["Leere Menge",8709], _
["Element von",8712], _
["Nicht Element von",8713], _
["enthält Elemente",8715], _
["Logisches Produkt",8719], _
["Logisches Summe",8721], _
["unendlich",8734], _
["Konjunktor",8743], _
["Adjunktor",8744], _
["Intersektion",8745], _
["Union",8746], _
["Similar",8764], _
["annähernd",8773], _
["asymetrisch",8776], _
["ungleich",8800], _
["identisch",8801], _
["kleiner-gleich",8804], _
["größer-gleich",8805], _
["Teilmenge",8834], _
["Übermenge",8835], _
["Keine Teilmenge",8836], _
["Teil- oder ganze Menge",8838], _
["Über- oder ganze Menge",8839], _
["Geöffnete Klammer",8249], _
["Geschlossene Klammer",8250], _
["alpha",945], _
["beta",946], _
["gamma",947], _
["delta",948], _
["epsilon",949], _
["zeta",950], _
["eta",951], _
["theta",952], _
["iota",953], _
["kappa",954], _
["lambda",955], _
["mu",956], _
["nu",957], _
["xi",958], _
["omicron",959], _
["pi",960], _
["rho",961], _
["final sigma",962], _
["sigma",963], _
["tau",964], _
["upsilon",965], _
["phi",966], _
["chi",967], _
["psi",968], _
["omega",969], _
["alpha (Kapital)",913], _
["beta (Kapital)",914], _
["gamma (Kapital)",915], _
["delta (Kapital)",916], _
["epsilon (Kapital)",917], _
["zeta (Kapital)",918], _
["eta (Kapital)",919], _
["theta (Kapital)",920], _
["iota (Kapital)",921], _
["kappa (Kapital)",922], _
["lambda (Kapital)",923], _
["mu (Kapital)",924], _
["nu (Kapital)",925], _
["xi (Kapital)",926], _
["omicron (Kapital)",927], _
["pi (Kapital)",928], _
["rho (Kapital)",929], _
["sigma (Kapital)",931], _
["tau (Kapital)",932], _
["upsilon (Kapital)",933], _
["phi (Kapital)",934], _
["chi (Kapital)",935], _
["psi (Kapital)",936], _
["omega (Kapital)",937], _
["bullet = black small circle",8226], _
["horizontal ellipsis",8230], _
["prime = minutes = feet",8242], _
["double prime = sec. = inch.",8243], _
["overline = spacing overscore",8254], _
["fraction slash",8260], _
["theta symbol",977], _
["upsilon with hook symb.",978], _
["pi symbol",982]]
Global $GUI, $List, $lbUniCode, $btCopy, $inCode, $index, $sData = ''
$GUI = GUICreate("UniCode - Symbole", 345, 400)
$List = GUICtrlCreateList("", 24, 15, 210, 358, BitOR($WS_BORDER, $WS_VSCROLL))
$lbUniCode = GUICtrlCreateLabel("", 260, 15, 60, 60, BitOR($SS_CENTER,$SS_CENTERIMAGE))
GUICtrlSetFont(-1, 18)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$inCode = GUICtrlCreateInput('', 260, 90, 60, 20, BitOR(0x0001,0x0800)) ; $ES_CENTER, $ES_READONLY
GUICtrlCreateGroup('', 245, 115, 90, 100)
$btCopy = GUICtrlCreateButton('Copy', 260, 130, 60, 20)
$rSymbol = GUICtrlCreateRadio('Symbol', 265, 160, 60)
GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlCreateRadio('Code', 265, 185, 60)
For $i = 0 To UBound($aUniCode) -1
$sData &= $aUniCode[$i][0] & '|'
Next
GUICtrlSetData($List, StringTrimRight($sData,1))
GUISetState()
[/autoit] [autoit][/autoit] [autoit]While 1
Switch GUIGetMsg()
Case -3
Exit
Case $List
$index = _GUICtrlListBox_GetCurSel($List)
GUICtrlSetData($lbUniCode, ChrW($aUniCode[$index][1]))
GUICtrlSetData($inCode, $aUniCode[$index][1])
Case $btCopy
$index = _GUICtrlListBox_GetCurSel($List)
If $index > -1 Then
If BitAND(GUICtrlRead($rSymbol), $GUI_CHECKED) Then
ClipPut(ChrW($aUniCode[$index][1]))
Else
ClipPut($aUniCode[$index][1])
EndIf
EndIf
EndSwitch
WEnd