ToolTip( ) reagiert unterschiedlich

**BugFix**

Hallo,

Ich habe im Code folgendes:

Code

...
ToolTip("Text", 350, 350, "Titel", 1)
Sleep(3000)
...

Im Programmablauf wird der Tip auch angezeigt - aber er verschwindet nicht wieder. Lasse ich nur diese 2 Codezeilen alleine laufen funktioniert es.
Ich hab mir erst mal so geholfen:

Code

...
ToolTip("Text", 350, 350, "Titel", 1)
Sleep(3000)
ToolTip("")
...

Dann verschwindet der Tip wieder, aber das ist ja nicht der Sinn der Funktion.
Nun habe ich mal mit ToolTip( ) alle Einstellungen durchprobiert. Dabei ist mir aufgefallen, dass die Option: "1 = Display as Balloon Tip" (bzw. "3" in Addition mit "Center the tip") dazu führt, dass der ToolTip gar nicht angezeigt wird. Hat jemand damit Erfahrungen?

**Xenobiologist**

Hi,

zeig doch mal den Code der zum "Fehler" führt. Bei mir funktioniert nämlich so weit alles wie beschrieben.

So long,

Mega

**BugFix**

Ist mein Lottogenerator

Spoiler anzeigen

Code

#include <GUIConstants.au3>
#Include<Array.au3>
Global $gezogen[6]


; == GUI generated with Koda ==
$Lotto = GUICreate("Lotto 6 aus 49", 399, 398, 192, 125)
GUICtrlCreateLabel("Ziehung", 120, 29, 43, 17)
$iZiehung = GUICtrlCreateInput("", 192, 24, 32, 24, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x000080)
$Group1 = GUICtrlCreateGroup("", 40, 72, 185, 281)
$iZahl1 = GUICtrlCreateInput("", 152, 104, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("1. Zahl", 80, 106, 37, 17)
GUICtrlCreateLabel("2. Zahl", 80, 138, 37, 17)
$iZahl2 = GUICtrlCreateInput("", 152, 136, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("3. Zahl", 80, 170, 37, 17)
$iZahl3 = GUICtrlCreateInput("", 152, 168, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("4. Zahl", 80, 202, 37, 17)
$iZahl4 = GUICtrlCreateInput("", 152, 200, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("5. Zahl", 80, 234, 37, 17)
$iZahl5 = GUICtrlCreateInput("", 152, 232, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("6. Zahl", 80, 266, 37, 17)
$iZahl6 = GUICtrlCreateInput("", 152, 264, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x000080)
$Input5 = GUICtrlCreateInput("", 408, 328, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlCreateLabel("Zusatzzahl", 80, 314, 55, 17)
$iZahlZusatz = GUICtrlCreateInput("", 152, 312, 32, 21, BitOR($ES_RIGHT,$ES_READONLY))
GUICtrlSetColor(-1, 0x800080)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$bStart = GUICtrlCreateButton("Start", 272, 24, 75, 25, 0)
$bClear = GUICtrlCreateButton("Löschen", 272, 64, 75, 25, 0)
$bEnd = GUICtrlCreateButton("Ende", 272, 120, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
	$msg = GuiGetMsg()
	Select
	Case $msg = $GUI_EVENT_CLOSE Or $msg = $bEnd
		ExitLoop
	Case $msg = $bClear
		_Clear()
	Case $msg = $bStart
		_Ziehung()
	EndSelect
WEnd
Exit


Func _Clear()
	GUICtrlSetData($iZahl1,"")
	GUICtrlSetData($iZahl2,"")
	GUICtrlSetData($iZahl3,"")
	GUICtrlSetData($iZahl4,"")
	GUICtrlSetData($iZahl5,"")
	GUICtrlSetData($iZahl6,"")
	GUICtrlSetData($iZahlZusatz,"")
	GUICtrlSetData($iZiehung,"")
	For $i = 0 To 5
		$gezogen[$i] = 0
	Next
EndFunc
Func _Ziehung()
	; Ziehung aller Zahlen
	For $i = 1 to 7
		While 1
			$again = 0
			$zufall = Random(1,49,1)
			$pos = _ArraySearch($gezogen, $zufall)
			If $pos <> -1 Then $again = 1
			If $again = 0 Then
				If $i < 7 Then
					$gezogen[$i-1] = $zufall
				Else
					$ZusatzZahl = $zufall
				EndIf
				ExitLoop
			EndIf
		WEnd
	Next
	; Darstellung in GUI
	For $i = 1 to 7
		For $j = 1 To 49
			GUICtrlSetData($iZiehung, $j)
			Sleep(10)
		Next
		If $i < 7 Then
			GUICtrlSetData($iZiehung, $gezogen[$i-1])
		Else
			GUICtrlSetData($iZiehung, $ZusatzZahl)
		EndIf
		Sleep(800)
		Select
			Case $i = 1
				GUICtrlSetData($iZahl1,$gezogen[$i-1])
			Case $i = 2
				GUICtrlSetData($iZahl2,$gezogen[$i-1])
			Case $i = 3
				GUICtrlSetData($iZahl3,$gezogen[$i-1])
			Case $i = 4
				GUICtrlSetData($iZahl4,$gezogen[$i-1])
			Case $i = 5
				GUICtrlSetData($iZahl5,$gezogen[$i-1])
			Case $i = 6
				GUICtrlSetData($iZahl6,$gezogen[$i-1])
			Case $i = 7
				GUICtrlSetData($iZahlZusatz,$ZusatzZahl)
		EndSelect
	Next
	; Sortierung
	ToolTip("Nun die gezogenen Zahlen" & @LF & "in geordneter Reihenfolge",422,340,"Ergebnis der Ziehung",1)
	Sleep(3000)
	ToolTip("")
	_ArraySort($gezogen)
	GUICtrlSetData($iZahl1,$gezogen[0])
	GUICtrlSetData($iZahl2,$gezogen[1])
	GUICtrlSetData($iZahl3,$gezogen[2])
	GUICtrlSetData($iZahl4,$gezogen[3])
	GUICtrlSetData($iZahl5,$gezogen[4])
	GUICtrlSetData($iZahl6,$gezogen[5])	
EndFunc

Alles anzeigen

Konnte ich nicht vor 18 Uhr zeigen, sonst hättet ihr noch die 6 Mio. ohne mich abgeräumt :schild4:

**bernd670**

Das der Tooltip erst verschwindet wenn du ToolTip("") schreibst steht auch so in der Hilfe!

Zitat

A Tooltip will appear until the script terminates or ToolTip("") is called.

Zitat

Nun habe ich mal mit ToolTip( ) alle Einstellungen durchprobiert. Dabei ist mir aufgefallen, dass die Option: "1 = Display as Balloon Tip" (bzw. "3" in Addition mit "Center the tip") dazu führt, dass der ToolTip gar nicht angezeigt wird. Hat jemand damit Erfahrungen?

Den Fehler kann ich nicht nachvollziehen, bei mir wird auch dann alles korrekt angezeigt!

**Xenobiologist**

HI,

stimme bernd vollkommen zu.

Deine Select $i sollte ein switch sein. (ist schneller)

Ich nehme mal an, dass es so lange dauert soll, aber du könntest das ganze natürlich auch schneller berechnen lassen. :party3:

So long,

Mega

**BugFix**

Hallo,
habe das ganze mal auf 'nem anderen Rechner getestet. Zumindest die Darstellung des Ballon-Tip ist damit möglich. Was allerdings auch hier nicht funktioniert, ist die automatische Beendung des Tips. Aber damit kann ich leben, setze ich halt ToolTip("").
Warum auf einem PC der Balloon-Tip dargestellt wird und auf dem andren nicht kann ich nicht nachvollziehen. Die Voraussetzung (IE5 oder höher) ist gegeben.

Zitat

Ich nehme mal an, dass es so lange dauert soll, aber du könntest das ganze natürlich auch schneller berechnen lassen.

Ja, soll etwas dauern, hab extra verzögert für den visuellen Effekt.

**bernd670**

Wie gesagt, Prgrammende oder ToolTip("") sind die einzigen Möglichkeiten den ToolTip wieder zu beenden (s. Hilfe)!

**peethebee**

Die Darstellung könnte auch vom XP-Style abhängen, also nicht ausgeführt werden, wenn man das "klassische Design" an hat.

peethebee

**BugFix**

Zitat

Die Darstellung könnte auch vom XP-Style abhängen

Ja, ich verwende ausschließlich das klassische Design. Der einzige Unterschied zwischen beiden PC - einer hat XP -Home und der andere (bei dem die Balloon-Tips gezeigt werden) hat XP -Prof.