1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Greenhorn

Beiträge von Greenhorn

  • "GUICtrlCreateEdit" den Text vor aenderung Schutzen!

    • Greenhorn
    • 17. Juli 2010 um 20:56
    Zitat von SEuBo

    Greenhorn: RTFP - Read the fucking Post ;)


    Schon richtig, aber dennoch:

    RTFM :P

    Zitat von GUICtrlCreateEdit

    To combine styles with the default style use BitOr($GUI_SS_DEFAULT_EDIT, newstyle,...).


    Gruß
    Greenhorn

  • "GUICtrlCreateEdit" den Text vor aenderung Schutzen!

    • Greenhorn
    • 17. Juli 2010 um 20:47

    Hi,

    RTFM ;)
    $ES_READONLY als Fensterstil für's Edit.


    Gruß
    Greenhorn

  • Pop-Up GUI Verschieben

    • Greenhorn
    • 17. Juli 2010 um 20:43

    Hi,

    wurde hier schon zigfach erfragt und die Hilfe sagt auch eindeutiges dazu !

    Aber ich will mal nicht so sein ...

    Spoiler anzeigen
    [autoit]

    #Include <WindowsConstants.au3>
    #include <GUIConstants.au3>

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

    Global $IDC_EXIT, $MainGUI

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

    $Width = 306
    $MainGUI = GUICreate("timer", _
    $Width, 236, @DesktopWidth - $Width, 0, _
    $WS_POPUP, $WS_EX_CONTROLPARENT )

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

    $IDC_EXIT = GUICtrlCreateButton("exit", 130, 200, 60, 25)

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

    GUICtrlSetState ($IDC_EXIT, $GUI_ONTOP)

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

    GUISetState(@SW_SHOW)

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

    While TRUE
    Switch GUIGetMsg()
    Case $IDC_EXIT
    ExitLoop
    EndSwitch
    WEnd

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


    Gruß
    Greenhorn

  • Controlcommand und TabRight

    • Greenhorn
    • 17. Juli 2010 um 20:28

    Hi,

    benutze einfach die TCM_SETCURSEL Nachricht mit SendMessage.


    Gruß
    Greenhorn

  • Toolbar ansprechen

    • Greenhorn
    • 13. Juli 2010 um 20:35

    Hallo,

    versuche es doch bitte einmal mit ControlCommand ...

    [autoit]

    ControlCommand ("Fenstertitel", "", ID_TOOLBAR, "SendCommandID", 201)

    [/autoit]

    Gruß
    Greenhorn

  • dll ansprechen mit stuktur

    • Greenhorn
    • 29. Juni 2010 um 17:04

    Hi,

    versuche es doch bitte einmal so ...

    [autoit]

    $result = DllCall ( $niDll_dll , "int:cdecl" ,"init_NICard", "ptr" ,DllStructGetPtr($nidll_Strukt) )

    [/autoit]

    EDIT:
    Da fehlen noch die anderen Parameter der Funktion !!!

    EDIT 2:
    Na gut, weil heute Dienstag ist ...
    So sollte es ungefähr aussehen (ungetestet!)

    Spoiler anzeigen
    [autoit]

    ;~ init_NICard (NICard *nicard, char* reportText, short* errorOccured, long* errorCode, char* errorMsg)

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

    ; strukturmitglieder
    $str = "char name[256];"& _
    "char port0[256];"& _
    "char port1[256];"& _
    "char port2[256];"& _
    "BOOL ioPort0;"& _
    "BOOL ioPORT1;"& _
    "BOOL ioPORT2;"& _
    "int handle[24];"& _
    "BOOL bits[24]"

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

    $nidll_Strukt = DllStructCreate($str) ; struktur generieren

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

    DllStructSetData($nidll_Strukt,"name","test")
    DllStructSetData($nidll_Strukt,"port0","A")
    DllStructSetData($nidll_Strukt,"port1","B")
    DllStructSetData($nidll_Strukt,"port2","C")
    DllStructSetData($nidll_Strukt,"ioPort0",True)
    DllStructSetData($nidll_Strukt,"ioPort1",True)
    DllStructSetData($nidll_Strukt,"ioPort2",True)
    DllStructSetData($nidll_Strukt,"handle",3)
    DllStructSetData($nidll_Strukt,"bits",0)

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

    ; Parameter zum Aufruf der Funktion init_NICard
    $szReportText = DllStructCreate ("char[256]")
    $ErrorOccured = DllStructCreate ("short")
    $ErrorCode = DllStructCreate ("long")
    $szErrorMsg = DllStructCreate ("char[256]")

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

    ; dll öffnen
    $niDll_dll = DllOpen("niDll.dll")

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

    ; Funktion zum Initialisieren aufrufen.
    init_NICard (DllStructGetPtr($nidll_Strukt), _
    DllStructGetPtr($szReportText), _
    DllStructGetPtr($ErrorOccured), _
    DllStructGetPtr($ErrorCode), _
    DllStructGetPtr($szErrorMsg))

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

    ;############ NICard API ############

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

    Func init_NICard ($lpNicard, $pszReportText, $pErrorOccured, $lpErrorCode, $pszErrorMsg)

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

    $aRes = DllCall ( $niDll_dll , "int:cdecl" ,"init_NICard", _
    "ptr" , $lpNicard, _
    "ptr" , $pszReportText, _
    "ptr" , $pErrorOccured, _
    "ptr" , $lpErrorCode, _
    "ptr" , $pszErrorMsg _
    )
    Return $aRes[0]

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

    EndFunc

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

    Gruß
    Greenhorn

  • AutoCloseBrackets.lua für SciTE

    • Greenhorn
    • 29. Juni 2010 um 16:58

    Hi,

    bis zur Version 1.7 (glaube ich) war es noch standardmäßig im SciTE-Menü implementiert. Die Entwickler von SciTE haben es dann aber herausgenommen, warum auch immer.
    Auf Anfrage (nicht von mir) kam dann der Tip mit dem LUA-Script. ;)


    Gruß
    Greenhorn

  • GUI mit $WS_POPUP GIF Bild Rand sollte unsichtbar sein und anstatt ist er weiss.

    • Greenhorn
    • 28. Juni 2010 um 22:04

    Hi,

    das hättest Du auch locker mit einem Blick in die Hilfe herausfinden können ...

    Spoiler anzeigen
    [autoit]

    #Include <StaticConstants.au3>
    ;~ #Include <WinAPIEx.au3>
    #Include <WindowsConstants.au3>
    #include <GUIConstants.au3>

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

    Global $IDC_PICTURE, $IDC_EXIT, $MainGUI

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

    $Width = 306
    $MainGUI = GUICreate("timer", _
    $Width, 236, @DesktopWidth - $Width, 0, _
    $WS_POPUP, BitOR ($WS_EX_TOOLWINDOW, $WS_EX_LAYERED))

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

    $IDC_PICTURE = GUICtrlCreatePic(@ScriptDir & "\lll.gif", _
    0, 0, 0, 0, _
    BitOR ($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS), _
    $GUI_WS_EX_PARENTDRAG)

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

    $IDC_EXIT = GUICtrlCreateButton("exit", 130, 200, 60, 25)

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

    GUICtrlSetState ($IDC_EXIT, $GUI_ONTOP)

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

    GUISetState(@SW_SHOW)

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

    While TRUE
    Switch GUIGetMsg()
    Case $IDC_EXIT
    ExitLoop
    EndSwitch
    WEnd

    [/autoit]


    Gruß
    Greenhorn

  • Schnuffel hat Geburtstag

    • Greenhorn
    • 28. Juni 2010 um 19:59

    Jo-ho.

    Auch von mir die herzlichsten Glückwünsche zum Geburtstag ! :)


    LG
    Greenhorn

  • Alles Gute, L3viathan

    • Greenhorn
    • 18. Juni 2010 um 00:31

    Oha, der 18. ... :D

    Herzlichen Glückwunsch und alles Gute, Lev. :)


    Gruß
    Greenhorn

  • Internetzensur - Nein Danke

    • Greenhorn
    • 14. Juni 2010 um 15:27
    Zitat von Andy


    Alles was mir zu diesem Thema einfällt, ist http://www.DubistTerrorist.de


    Du meinst wohl http://www.rettedeinefreiheit.de/ ...

    Ja, das Thema Kinderpornographie dafür auszunuzten ist ein geschickter Schachzug.
    Jeder "BILD"-Leser mit geBILDeter Meinung wird dem Gesetz voll und ganz zustimmen.

    Die Vorratsdatenspeicherung wird auch wieder auf den Tisch kommen, vielleicht noch dieses Jahr.
    Aber es gibt noch viel bessere Sachen, wie z.B. ELENA.
    Dort wird alles erdenkliche gespeichert, z.B. ob Du gestreikt hast und ob dein Arbeitgeber den Streik für unangemessen gehalten hat.
    Und es gibt noch das Stockholmer Programm.

    Dies sind alles Teile eines Ganzen, das man Überwachungsstaat nennt.


    Gruß
    Greenhorn

  • Online-UDF-Hilfe kein Link ?

    • Greenhorn
    • 13. Juni 2010 um 23:12

    Sollte man den nicht in die Startseite der AutoIt-Online-Doku integrieren ?

    EDIT:
    Auf der englischen Startseite der AutoIt-Online-Doku ist ebenfalls kein Verweis/Link vorhanden. Vielleicht kannst Du das ja mal mit Valik besprechen ?!

    Gruß

  • Online-UDF-Hilfe kein Link ?

    • Greenhorn
    • 13. Juni 2010 um 22:58

    Hi,

    mir ist gerade aufgefallen, daß irgendwie kein Link zur UDF-Hilfe vorhanden ist ...

    Oder bin ich blind ?!? :S


    Gruß
    Greenhorn

  • Todo Forumsupdate

    • Greenhorn
    • 5. Juni 2010 um 01:12

    Es wäre schöner, wenn die "wichtigen Links" und der "Online-Hilfe"-Link unter dem Banner in einem neuen Tab/Fenster aufgemacht würden, finde ich.

    Gruß
    Greenhorn

  • Problem mit Lüftern

    • Greenhorn
    • 5. Juni 2010 um 00:59

    Einfach nur den Lüfter abnehmen, sofern abnehmbar (Kühler drauf lassen) und vorsichtig, am besten mit einem Pinsel, die Rippen des Kühlers und die Lüfterblätter reinigen.
    Bei dieser Gelegenheit kann man sich auch gleich den Lüfter der GraKa ansehen, sofern einer drauf ist.
    Ebenso Gehäuselüfter und was sonst noch so verstaubt ist.

    Diese Prozedur sollte man ruhig einmal im Jahr seinem Rechner angedeihen lassen.

    Zu beachten ist eigentlich nur statische Aufladung zu vermeiden, Abhilfe schafft ein kurzes Berühren von etwas geerdetem, z.B. Heizkörper.

    EDIT:
    Eigentlich gehört dieses Thema ins Offtopic-Forum. ;)


    Gruß
    Greenhorn

  • Problem mit Lüftern

    • Greenhorn
    • 4. Juni 2010 um 22:52

    Hi,

    mal 'ne kleine Frage zwischendurch ...

    Hast Du dir die Kühlrippen des CPU-Kühlers angesehen ?
    Wenn da ein Wollpulli drauf ist dann sollte das Übel gefunden sein. ;)
    Bei den alten Kisten ist meist mangelnde (Innen)Pflege das Problem.

    Vorsichtig mit einem Pinsel reinigen und dann sollte es besser werden.

    EDIT:
    Oder der Kühlerlüfter selbst hat einen weg, könnte auch sein ...


    Gruß
    Greenhorn

  • array vor dem schreiben in eine datei filtern.

    • Greenhorn
    • 3. Juni 2010 um 23:08

    Es scheint so, als wäre $a_ip kein Array ... ;)

    Bei solchen Deklarationen solltest Du defensiver programmieren und vorher prüfen, ob soweit alles gut ist.


    Gruß
    Greenhorn

  • array vor dem schreiben in eine datei filtern.

    • Greenhorn
    • 3. Juni 2010 um 22:50

    Also so scheint es bei mir zu funzen ...

    Spoiler anzeigen
    [autoit]

    #include <Array.au3>

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

    _listchange()

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

    Func _listchange()

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

    Local $list123, $array, $search, $buffer
    $list123 = Iniread("serverlist.ini" , "serverlist", "servers","")
    $list123 = StringRegExpReplace($list123, '\(.+?\)', '')
    $array = StringSplit($list123, '|')

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

    If (not IsArray ($array)) Then _
    Return FALSE

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

    _ArrayDisplay($array)
    Do
    ;~ for $y2=0 to $array[1]
    $search = _ArraySearch($array,"")

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

    If ($search == -1) Then _
    ExitLoop

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

    _ArrayDelete($array,$search)
    ;~ Next
    Until $search == -1

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

    ; das hier geht nicht:
    Do
    ;~ for $i=0 to $array[1]
    $search = _ArraySearch($array,"bra")

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

    If ($search == -1) Then _
    ExitLoop

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

    _ArrayDelete($array,$search)
    ;~ Next
    Until $search == -1

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

    _ArrayDisplay($array)
    ;~ Local $buffer = ''
    for $i = 1 to UBound($array)-1
    $buffer &= $array[$i] & @CRLF
    Next
    FileWrite(@ScriptDir & '\temp.txt', $buffer)

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

    EndFunc

    [/autoit]
    Spoiler anzeigen
    Code
    www.web.net
    127.0.0.1
    7.0.133.109
    7.0.133.111
    7.3.247.97
    7.1.14.12

    Gruß

  • array vor dem schreiben in eine datei filtern.

    • Greenhorn
    • 3. Juni 2010 um 22:30

    Hi,

    warum die For-Schleife in der Do-Until-Schleife ???

    Versuche es mal bitte so ...

    Spoiler anzeigen
    [autoit]

    Func _listchange()

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

    Local $list123, $array, $search, $buffer
    $list123 = Iniread("serverlist.ini" , "serverlist", "servers","")
    $list123 = StringRegExpReplace($list123, '\(.+?\)', '')
    $array = StringSplit($list123, '|')

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

    If (not IsArray ($array)) Then _
    Return FALSE

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

    _ArrayDisplay($array)
    Do
    ;~ for $y2=0 to $array[1]
    $search = _ArraySearch($array,"")
    _ArrayDelete($array,$search)
    ;~ Next
    Until $search == -1

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

    ; das hier geht nicht:
    Do
    ;~ for $i=0 to $array[1]
    $search = _ArraySearch($array,"bra")
    _ArrayDelete($array,$search)
    ;~ Next
    Until $search == -1

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

    _ArrayDisplay($array)
    ;~ Local $buffer = ''
    for $i = 0 to UBound($array)-1
    $buffer &= $array[$i] & @CRLF
    Next
    FileWrite(@ScriptDir & 'temp.txt', $buffer)

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

    EndFunc

    [/autoit]

    Gruß
    Greenhorn

  • _GUICtrlRichEdit_StreamToVar Problem

    • Greenhorn
    • 29. Mai 2010 um 22:57

    Hi,

    von RichEdit weiß ich nicht viel, leider.
    Aber, wenn ich die Funktion herausnehme klappt alles ...

    Spoiler anzeigen
    [autoit]

    #include <ComboConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiRichEdit.au3>
    #include <GuiStatusBar.au3>
    #include <Misc.au3>
    #include <WindowsConstants.au3>

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

    #region ### START Koda GUI section ### Form=
    $MainForm = GUICreate("MainForm", 1025, 769, 192, 124)
    $MenuItem2 = GUICtrlCreateMenu("MenuItem2")
    $MenuItem1 = GUICtrlCreateMenu("MenuItem1")
    $StatusBar1 = _GUICtrlStatusBar_Create($MainForm)
    _GUICtrlStatusBar_SetMinHeight($StatusBar1, 26)
    $Edit1 = _GUICtrlRichEdit_Create($MainForm, "", 30, 75, 471, 151, BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
    $Edit2 = _GUICtrlRichEdit_Create($MainForm, "", 30, 245, 471, 161, BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
    $Edit3 = _GUICtrlRichEdit_Create($MainForm, "", 30, 430, 476, 171, BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
    $Button_Fett = GUICtrlCreateButton("F", 5, 5, 26, 21)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Button_Kursiv = GUICtrlCreateButton("K", 35, 5, 26, 21)
    GUICtrlSetFont(-1, 8, 400, 2, "MS Sans Serif")
    $Button_Unter = GUICtrlCreateButton("U", 65, 5, 26, 21)
    GUICtrlSetFont(-1, 8, 400, 4, "MS Sans Serif")
    $Combo_Grosse = GUICtrlCreateCombo("8", 270, 5, 51, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "10|12|14|16|18|20|22|24|28|36|48|72|80")
    $Button_Color = GUICtrlCreateButton("Text-Farbe", 95, 5, 71, 21)
    $Button_BkColor = GUICtrlCreateButton("Hintergrund-Farbe", 170, 5, 96, 21)
    $Label_ausrichtung = GUICtrlCreateLabel("Ausrichtung: ", 330, 8, 66, 17)
    $Button_links = GUICtrlCreateButton("Links", 400, 5, 46, 21)
    $Button_mitte = GUICtrlCreateButton("Mitte", 450, 5, 46, 21)
    $Button_rechts = GUICtrlCreateButton("Rechts", 500, 5, 46, 21)

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

    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

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

    While 1

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

    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    RichExit()
    Case $Button_Fett
    $RichEditHwnd = get_RichEdit()
    fett($RichEditHwnd)
    Case $Button_Kursiv
    $RichEditHwnd = get_RichEdit()
    kursiv($RichEditHwnd)
    Case $Button_Unter
    $RichEditHwnd = get_RichEdit()
    unter($RichEditHwnd)
    Case $Combo_Grosse
    $RichEditHwnd = get_RichEdit()
    grosse($RichEditHwnd)
    Case $Button_Color
    $RichEditHwnd = get_RichEdit()
    color($RichEditHwnd)
    Case $Button_BkColor
    $RichEditHwnd = get_RichEdit()
    bk_color($RichEditHwnd)
    Case $Button_links
    $RichEditHwnd = get_RichEdit()
    $sort = "links"
    sort($RichEditHwnd,$sort)
    Case $Button_mitte
    $RichEditHwnd = get_RichEdit()
    $sort = "mitte"
    sort($RichEditHwnd,$sort)
    Case $Button_rechts
    $RichEditHwnd = get_RichEdit()
    $sort = "rechts"
    sort($RichEditHwnd,$sort)
    EndSwitch
    WEnd

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

    Func get_RichEdit()
    Select
    Case _GUICtrlRichEdit_IsTextSelected($Edit1)
    ConsoleWrite ("--- Edit1" & @CRLF)
    Return $Edit1
    Case _GUICtrlRichEdit_IsTextSelected($Edit2)
    ConsoleWrite ("--- Edit2" & @CRLF)
    Return $Edit2
    Case _GUICtrlRichEdit_IsTextSelected($Edit3)
    ConsoleWrite ("--- Edit3" & @CRLF)
    Return $Edit3
    EndSelect
    EndFunc ;==>get_RichEdit

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

    Func sort($RichEdit,$ausrichtung)
    If $ausrichtung = "links" Then _GUICtrlRichEdit_SetParaAlignment($RichEdit, "l")
    If $ausrichtung = "mitte" Then _GUICtrlRichEdit_SetParaAlignment($RichEdit, "c")
    If $ausrichtung = "rechts" Then _GUICtrlRichEdit_SetParaAlignment($RichEdit, "r")

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

    EndFunc ;==>color

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

    Func color($RichEdit)
    $color = _ChooseColor()
    _GUICtrlRichEdit_GetSel($RichEdit)
    _GUICtrlRichEdit_SetCharColor($RichEdit, $color);"804080")
    EndFunc ;==>color

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

    Func bk_color($RichEdit)
    $color = _ChooseColor()
    _GUICtrlRichEdit_GetSel($RichEdit)
    _GUICtrlRichEdit_SetCharBkColor($RichEdit, $color);"804080")
    EndFunc ;==>bk_color

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

    Func grosse($RichEdit)
    $soll_size = GUICtrlRead($Combo_Grosse)
    _GUICtrlRichEdit_SetFont($RichEdit, $soll_size)
    ;~ $stream = _GUICtrlRichEdit_StreamToVar($RichEdit)
    ;~ _GUICtrlRichEdit_StreamFromVar($RichEdit,$stream)
    EndFunc ;==>grosse

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

    Func fett($RichEdit)
    $attribs = _GUICtrlRichEdit_GetCharAttributes($RichEdit)

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

    $fett = StringInStr($attribs, "bo+")
    $nicht_fett = StringInStr($attribs, "bo-")

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

    Select
    Case $fett <> 0
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "-bo")
    Case $nicht_fett <> 0
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "+bo")
    Case Else
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "+bo")
    EndSelect
    ;~ $stream = _GUICtrlRichEdit_StreamToVar($RichEdit)
    ;~ _GUICtrlRichEdit_StreamFromVar($RichEdit,$stream)
    ;~ MsgBox(0,"","" & $stream)
    EndFunc ;==>fett

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

    Func kursiv($RichEdit)
    $attribs = _GUICtrlRichEdit_GetCharAttributes($RichEdit)

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

    $kursiv = StringInStr($attribs, "it+")
    $nicht_kursiv = StringInStr($attribs, "it-")

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

    Select
    Case $kursiv <> 0
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "-it")
    Case $nicht_kursiv <> 0
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "+it")
    Case Else
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "+it")
    EndSelect
    ;~ $stream = _GUICtrlRichEdit_StreamToVar($RichEdit)
    ;~ _GUICtrlRichEdit_StreamFromVar($RichEdit,$stream)
    EndFunc ;==>kursiv

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

    Func unter($RichEdit)
    $attribs = _GUICtrlRichEdit_GetCharAttributes($RichEdit)

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

    $unter = StringInStr($attribs, "un+")
    $nicht_unter = StringInStr($attribs, "un-")

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

    Select
    Case $unter
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "-un")
    Case $nicht_unter
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "+un")
    Case Else
    _GUICtrlRichEdit_SetCharAttributes($RichEdit, "+un")
    EndSelect
    ;~ $stream = _GUICtrlRichEdit_StreamToVar($RichEdit)
    ;~ _GUICtrlRichEdit_StreamFromVar($RichEdit,$stream)
    EndFunc ;==>unter

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

    Func RichExit()
    _GUICtrlRichEdit_Destroy($Edit1)
    _GUICtrlRichEdit_Destroy($Edit2)
    _GUICtrlRichEdit_Destroy($Edit3)
    Exit
    EndFunc ;==>RichExit

    [/autoit]

    Gruß
    Greenhorn

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™