Huhu
ich hab ein paar Probleme mal wieder
ich bin ein chat programm am schreiben das die shoutbox von autoit.de einlesen soll und mit ein paar features in einer gui ausgeben soll.
Probleme:
1. Die Editbox soll man nicht reinschreiben können aber trotzdem mit den scrollpfeilen nach oben unten links und rechts scrollen können.
2. Die Smylies sollen entweder normal oder garnicht angezeigt werden.
jemand ideen wie ich diese Probleme lösen könnte?
Spoiler anzeigen
#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.6.0
Author: Zocker5656
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]; Script Start - Add your code below here
[/autoit] [autoit][/autoit] [autoit]#include <GUIConstants.au3>
#include <INet.au3>
#include <array.au3>
$text2 = _INetGetSource('http://autoit.de/index.php?page=Portal')
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=c:\users\zocker5656\development\autoit\koda\forms\form1.kxf
$Form1_1 = GUICreate("Autoit Chat 0.1", 631, 298, 267, 270)
GUISetIcon("C:\Users\zocker5656\Desktop\Messenger Mac.ico")
GUISetBkColor(0xC0C0C0)
$Input1 = GUICtrlCreateInput("", 0, 272, 569, 21)
$Button1 = GUICtrlCreateButton("Button1", 568, 269, 59, 25, 0)
GUICtrlSetCursor (-1, 0)
$Edit1 = GUICtrlCreateEdit("", 0, 0, 569, 273)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button2 = GUICtrlCreateButton("Button2", 568, 0, 59, 102, 0)
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$text = StringRegExp($text2,"message: ': (.*?)',",3)
GUICtrlSetData($Edit1,$text[0] & @CRLF & $text[1] & @CRLF & $text[2] & @CRLF & $text[3] & @CRLF & $text[4] & @CRLF & $text[5] & @CRLF & $text[6] & @CRLF & $text[7] & @CRLF & $text[8] & @CRLF & $text[9] & @CRLF & $text[10] & @CRLF & $text[11] & @CRLF & $text[12] & @CRLF & $text[13] & @CRLF & $text[14] & @CRLF & $text[15] & @CRLF & $text[16] & @CRLF & $text[17] & @CRLF & $text[18] & @CRLF & $text[19] & @CRLF)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
EndSwitch
WEnd
MFG Zocker5656