Tja,
hierfür einen namen zu finden gestaltet sich für mich ziemlich schwierig,
deswegen poste ich euch ein kleines (sehr kleines) Script,
was keinen sinn hat und einfach nur eine kleine übung für mich war.
Es ist wirklich nichts dolles, aber es funzt (wenn auch sehr komisch von mir gelöst)
Spoiler anzeigen
$Text = "Hallo Welt"
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode",1)
$Form1 = GUICreate("Buchstaben", 400, 200)
GUISetOnEvent($GUI_EVENT_CLOSE,"_Exit")
$Label1 = GUICtrlCreateLabel($Text, 50, 50, 350, 150)
GUICtrlSetFont(-1, 14, 800, 0, "Arial")
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetData(-1, "")
GUISetState(@SW_SHOW)
_Label($Label1, $Text, 12)
While Sleep(1)
WEnd
Func _Label($Label, $Text, $delay = 50)
$ro = ""
$bj = ""
$j = 0
$End = ""
$ABC = " ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890ßÄÖÜ.:,;/\()?{} "
$te = StringSplit($Text, "", 2 + 1)
$b = StringSplit($ABC, "", 2 + 1)
For $i = 0 To UBound($te) - 1
;
Do
Sleep($delay)
$j += 1
If $j = UBound($b) - 1 Then
$bj &= "?"
ExitLoop
EndIf
Sleep($delay)
GUICtrlSetData($Label, $bj & $b[$j])
Until $b[$j] = $te[$i]
;
$bj &= $b[$j]
Sleep($delay)
$j = 0
Next
EndFunc ;==>_Label
Func _Exit()
Exit
EndFunc
.
