Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 14:44

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[AutoIT]Problem mit Label !

Discussion on [AutoIT]Problem mit Label ! within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 20
Join Date: Feb 2010
Posts: 561
Received Thanks: 257
[AutoIT]Problem mit Label !

Hallo Leute .
Ich sitze zur Zeit an einem Projekt und komme bei einer stelle einfach nicht weiter.
Das Problem ist das ich es einfach nicht schaffe einen Label jede 20 Sekunden um 50 zu erweitern also so : 20 = 50 dan wieder 20 sekunden vorbei = 100 usw.
Hier mal ein anfangs Code :

Code:
HotKeySet ("1","-Start")
HotKeySet ("2","-Pause")

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Verdientes Geld :", 223, 33, 192, 124)
$Label1 = GUICtrlCreateLabel("0", 80, 8, 82, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd

Func -Start()
	;Hier weiß ich nich weiter hab mich nie mit sowas beschäfftigt
EndFunc

Func -Pause()
	While 1
	sleep (10000)
	WENd
EndFunc
Hoffe ihr könnt mir bis morgen helfen !

FROHES NEUES JAHR

MFG
CrAcKxX is offline  
Old 01/01/2011, 01:30   #2
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
weiß nicht mehr wie genau aber ca so:

while 1
seleep(20000)
GUICtrlSetData($label1,guictrlread($label1)+50)
wend
KingZuck is offline  
Thanks
1 User
Old 01/01/2011, 20:13   #3
 
elite*gold: 20
Join Date: Feb 2010
Posts: 561
Received Thanks: 257
Ma schaun ;D
Edit: Danköö es klapptö
CrAcKxX is offline  
Old 01/01/2011, 23:22   #4
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
Bitte schööööön
aber für thx gibt es ein button
KingZuck is offline  
Old 01/02/2011, 00:05   #5
 
PenGuin :O's Avatar
 
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
Nur kannst du in den 20 Sekunden nichts weiter machen.
Machs lieber so:

Code:
Global $i = 0

AdlibRegister("Count", 20000)

$Form1 = GUICreate("Verdientes Geld :", 223, 33, 192, 124)
$Label1 = GUICtrlCreateLabel("0", 80, 8, 82, 17)
GUISetState()

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case -3
			Exit

	EndSwitch
WEnd

Func Count()
	$i += 20
	GUICtrlSetData($Label1, $i)
EndFunc
PenGuin :O is offline  
Reply


Similar Threads Similar Threads
[Problem]Inputbox + Label
08/21/2010 - AutoIt - 4 Replies
Hi ich will das mein Program eine inputbox öffnet und das in einem Label angiebt :) so habe ich es versucht $name = Inputbox("Name","Bitte gebe deinen namen ein") und dan öffnet sich ein fenster sozusamen ein minni spiel wo der name in einen Label stehen soll :) $Label1 = GUICtrlCreateLabel("Name: $name", 8, 8, 97, 20) //edit habe die löseung ;) aber ein anderes problem
Autoit: Durchsichtige Label dami Hintergrundbild sichtbar wird?
07/31/2010 - General Coding - 0 Replies
Wie mache ich dass die Teste und so einen durchsichtigen hintergrund bekommen, damit man dass Hintergrundbild des Fensters sehen kann? Habe schon etwas an einigen Teilen probiert und in Foren gesucht, nichts hat geklappt, dementsprechend durcheinander ist der code jetzt auch xD Opt("GUIOnEventMode", 1) $Form1_1 = GUICreate("SF-Bot", 420, 500, 186, 115) $Pic2 = GUICtrlCreatePic("pic\background.bmp", 0, 0, 420, 500) GUICtrlSetState($Pic2, $GUI_DISABLE) GUICtrlSetBkColor(-1,...
Offset in Label wiedergeben (autoit)
07/06/2010 - General Coding - 0 Replies
Hallo Com, Ich möchte ein bestimmtes offset in einem label wiedergeben lassen wie kann ich dieses machen? Bis jetzt habe ich: Global $ID=_MemoryOpen(0x0000043C) Global $Data=0x01AA730D



All times are GMT +1. The time now is 14:44.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.