Ein paar Fragen zu strings

1. offizieller Beitrag

    Ich habe mal wieder ein paar fragen zu stringfunctionen:

    1. Gibt es eine Funktion, die überprüft, ob ein stringteil vorhanden ist? --> $string= Blablu --> ob in $string "bla" enthalten ist...

    2. Was gibt es noch für stringveränderungsmöglichkeiten?
    also _stringtohex <-> hextostring | .... |kein stringencrypt bitte

    EDIT:
    3. Wie kann ich in einem Gui input das Strg+A erlauben? Also, das der ganze Text kopiert werden kann?

    4. Ich habe in manchen Signaturen einen String gesehen, der folgendermaßen aussah: 0001000111001101

    Ich finde gerade diesen Thread nicht, kann mir jemand den Link schicken, oder mir sagen, wie man das macht?
    MFG Sebastian

    Einmal editiert, zuletzt von der Scripter (15. Juni 2009 um 21:00)

    Hab ein paar edits hinzugefügt :=)

    Wäre nett, wenn ihr die auch lösen könntet.

    3. Ist standardmäßig eingeschaltet
    4. Das ist/sind die Stringfunktionen StringtoBinary/BinarytoString

    [autoit]


    $str = StringToBinary("www.autoit.de")
    MsgBox(0x40, "$str = ", $str)
    $str = BinaryToString($str)
    MsgBox(0x40, "$str = ", $str)

    [/autoit]
    • Offizieller Beitrag

    Zu 4. hatte ich zwei kleine Funktionen geschrieben:

    [autoit]


    ConsoleWrite(_BinToString('01010100011001010111001101110100') & @CRLF)
    ConsoleWrite(_StringToBin('Test') & @CRLF)

    [/autoit][autoit][/autoit][autoit]

    Func _BinToString($bin)
    Local $aChr = StringRegExp($bin, '.{8}', 3), $dec, $string = ''
    For $k = 0 To UBound($aChr) - 1
    $dec = 0
    For $i = 8 To 1 Step -1
    $dec += 2 ^ (8 - $i) * StringMid($aChr[$k], $i, 1)
    Next
    $string &= Chr($dec)
    Next
    Return $string
    EndFunc ;==>_BinToString

    [/autoit][autoit][/autoit][autoit]

    Func _StringToBin($string)
    Local $aChr = StringSplit($string, ''), $bin = ''
    For $k = 1 To $aChr[0]
    For $i = 7 To 0 Step -1
    $bin &= (BitAND(Asc($aChr[$k]), 2 ^ $i) = 2 ^ $i) * 1
    Next
    Next
    Return $bin
    EndFunc ;==>_StringToBin

    [/autoit]