Hallo
kann mir jemand erklären wie ich auf einer normalen Oberfläche einen Lauftext erstelle.
Dieser soll dann von Rechts nach Links über meine GUI laufen.
Vielen Dank
TKH
Hallo
kann mir jemand erklären wie ich auf einer normalen Oberfläche einen Lauftext erstelle.
Dieser soll dann von Rechts nach Links über meine GUI laufen.
Vielen Dank
TKH
HI,
wie ein Newsticker? Soll er durchlaufen auf einem Label? Statusbar?
Kannst du deine GUI posten?
Mega
Ja richtig am besten auf einem Label.
[autoit]
$gui = GUICreate("Oberfläche",1024,768,-1,-1,$WS_POPUP) ; will create a dialog box that when displayed is centered
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
Opt("GUICoordMode",1)
Opt("WinTitleMatchMode", 2)
$myKategorie = GUICtrlCreateCombo ("", 180,170,500,40) ;
GUICtrlSetFont ($myKategorie,18, 500, 0, $font)
GUICtrlSetData($myKategorie, $ZuZeigen[0][0] & "|", $ZuZeigen[0][0])
for $i = 1 to $AnzahlFiles-1
$ret = _GUICtrlComboBox_FindString($myKategorie,$ZuZeigen[$i][0] )
If($ret = $CB_ERR) Then
GUICtrlSetData($myKategorie, $ZuZeigen[$i][0] & "|")
EndIf
Next
$myList = GUICtrlCreateListView ( "Text|Typ|Pfad", 180, 220 , 500 , 300 ,$LVS_SHOWSELALWAYS + $LVS_SINGLESEL + $LVS_NOCOLUMNHEADER )
GUICtrlSetFont ($myList,18, 500, 0, $font)
FillMyList()
$font="Franklin Gothic Book"
GUICtrlCreateLabel ("EATON News:",180, 550, 200, 100)
GUICtrlSetFont (-1,17, 500, 0, $font)
GUICtrlCreateLabel ("DIESER TEXT SOLL LAUFEN" ,180, 600,500,120)
GUICtrlSetFont (-1,12, 500, 0, $font)
Hier mit Adlibenable:
#include <GUIConstants.au3>
$gui = GUICreate("Oberfläche",1024,768,-1,-1,$WS_POPUP) ; will create a dialog box that when displayed is centered
$font="Franklin Gothic Book"
Opt("GUICoordMode",1)
Opt("WinTitleMatchMode", 2)
GUICtrlCreateLabel ("EATON News:",180, 550, 200, 100)
GUICtrlSetFont (-1,17, 500, 0, $font)
$Scrolltext = "DIESER TEXT SOLL LAUFEN"
$Scrolllabel = GUICtrlCreateLabel ($Scrolltext ,180, 600,500,120)
GUICtrlSetFont (-1,12, 500, 0, $font)
GUISetState()
AdlibEnable("_Scroll",300)
While 1
If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit
WEnd
Func _Scroll()
$txt = GUICtrlRead($Scrolllabel)
$space = ""
If $txt = $Scrolltext Then $txt &= " -- "
$txt = StringTrimLeft($txt,1) & StringLeft($txt,1)
GUICtrlSetData($Scrolllabel,$txt)
EndFunc