Hex zu Dez

**Xorianator**

Zitat von Knuckels

Tschuldigung für Doppelpost
aber ich hab noch ein kleines problem -.-

Spoiler anzeigen

[autoit]
#include <GUIConstants.au3>
GUICreate("", 300, 100)
[/autoit] [autoit][/autoit] [autoit]
$input = GUICtrlCreateInput("", 0, 0, 150, 40)
$label = GUICtrlCreateLabel("", 150, 0, 100, 40)
$button = GUICtrlCreateButton("OK", 0, 40, 300, 60)
[/autoit] [autoit][/autoit] [autoit]
GUISetState()
[/autoit] [autoit][/autoit] [autoit]
while 1
$msg = GUIGetMsg()
[/autoit] [autoit][/autoit] [autoit]
Switch $msg
case $GUI_EVENT_CLOSE
Exit
Case $button
If GUICtrlRead($input)="" Then
MsgBox(16, "", "Gib bitt ewas ein")
ElseIf Not StringIsXDigit(GUICtrlRead($input)) Then
MsgBox(16, "", "Falsches Zeichen")
Else
GUICtrlSetData($label, _Dec(GUICtrlRead($input)))
ClipPut(_Dec(GUICtrlRead($input)));und schon ist es auch im Clipboard
EndIf
EndSwitch
WEnd
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
ConsoleWrite(_Dec($input) & @CRLF);Das Ergebnis wird in die Console geschrieben
[/autoit] [autoit][/autoit] [autoit]
Func _Dec($sHex)
Local $exp = 0, $dec = 0, $a = StringSplit($sHex, '')
For $i = $a[0] To 1 Step -1
$dec += Dec($a[$i])*(16^$exp)
$exp += 1
Next
[/autoit] [autoit][/autoit] [autoit]
Return $dec
[/autoit] [autoit][/autoit] [autoit]
EndFunc
[/autoit]

wo muss ich da clipput() einfügen damit er die zahl die er da raus bekommt in denn zwischenspeicher packt=(
ich bekomm das irgentwie nicht hin
MfG Knuckels

Alles anzeigen

Habe das script editiert und es ist im zitat im spoiler nachzulesen