RichTextBox ReadOnly...

  • Hi @ Alle

    Mein Problem:
    Ich hab mir mehrere Rich Text UDF's gesaugt, aber ich hab leider nicht herrausgefunden wie das funktionieren
    könnte, vll kennt sich hier ja jemand damit aus . :thumbup:

    Ich möchte das ich ein bestimmter Text in meiner Rich Text Box gschützt wird (er soll nicht gelöscht werden können)
    Dazu Poste ich hier mal n Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <RichText.au3>

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

    $main = GUICreate("Test Window", 251, 137, 890, 631, -1, BitOR($WS_EX_TOOLWINDOW,$WS_EX_WINDOWEDGE,$WS_EX_TOPMOST))
    $con = RichText_Create($main, 0, 0, 251, 138)
    winsettrans($main, "", 215)
    GUISetState(@SW_SHOW)
    RichText_HideSelection($con)
    RichText_SetFont($con, "Consolas")
    RichText_SetBold($con, true)
    RichText_BkColor($con, 0x000000)

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

    info() ;Der Text soll ReadOnly sein
    RichText_AppendText($con, "some random text"& @crlf) ;Der Text hier soll ReadOnly sein
    uinp() ;Der Text soll ReadOnly sein

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

    Func info()
    RichText_SetBold($con, true)
    RichText_SetFont($con, "Consolas")
    RichText_SetColor($con, 0x0AFEFE)
    RichText_AppendText($con, "[INFO]: ")
    RichText_SetColor($con, 0xFFFFFF)
    EndFunc

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

    Func uinp()
    RichText_SetBold($con, true)
    RichText_SetFont($con, "Consolas")
    RichText_SetColor($con, 0x4BC04B)
    RichText_AppendText($con, "[USER]: ")
    RichText_SetColor($con, 0xFFFFFF)
    EndFunc

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]


    Okay, nach dem der den Text da reingeschrieben hat, soll der Benutzer etwas eingeben, zB. /help (das soll
    dann aber logischerweise nich ReadOnly sein :D )

    Hab die RichText.au3 & 1x Textdatei mit den Funktionen angehängt, hab ich ausnm Englischen Forum !

    autoit.de/wcf/attachment/5023/ & autoit.de/wcf/attachment/5024/

    Danke schonmal im vorraus =)

    Greez mcOOcr