Hallo,
Ich übe mich mit programmieren mit der AutoIt Skriptsprache, schreibe gerne das "Changelog" in eine Textdatei. Nun möchte ich diese in einer GUI ausgeben. Mein Code schaut bis jetzt so aus:
Beim ausführen markiert er mir den eingelesenen Text, und das stört mich.
Ich habe es schon versucht in ein GUICtrlCreateLabel reinzustellen, dann ist aber das Scrollen nicht mehr möglich. Habt ihr eine Idee dazu?
Danke für die Hilfe!
C
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Date.au3>
Dim $version = "Version 0.2.6"
;~ Dim $changelog = @WorkingDir & "Changelog.txt"
Dim $changelog = "C:\Windows\WindowsUpdate.log" ; Zur Demonstration
GUICreate("About", 613, 506)
$Output = GUICtrlCreateEdit("", 8, 90, 600, 380, $WS_VSCROLL)
GUICtrlCreateLabel("Changelog " & $Version, 59, 11, 500, 20)
GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif")
GUICtrlCreateLabel("(c) 2017" & @CRLF & @CRLF & "Company Name", 59, 30, 135, 40)
GUICtrlCreateLabel("myname@company.com", 59, 70, 135, 15)
GUICtrlSetFont(-1, 9, 800, 100, "MS Sans Serif")
GUICtrlCreateLabel("Release Date: " & _DateTimeFormat(_NowCalc(), 2), 8, 480, 135, 15)
$frmHaupt_cmdFormDiag = GUICtrlCreateButton("Diagnose", 475, 480, 135, 20)
$_ReadFile = FileRead($changelog)
GUICtrlSetData($Output, $_ReadFile)
GUISetState()
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
Alles anzeigen