Buttonname gleich Inputfeld?

[°Incinerate]

Hey e*PvP

ich hätte eine Frage, kann ich den Button name (das was im Button steht) mit einem Inputfeld verändern? Also wenn ich z.B. in den Input "001" schreibe, dass der Button dann auch "001" heißt.

Hier der Script:

 Spoiler

PHP Code:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Test", 214, 122, 302, 180)
$Button1 = GUICtrlCreateButton("", 63, 27, 75, 25, $WS_GROUP)
$Input1 = GUICtrlCreateInput("001", 47, 67, 121, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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


[Lawliet]

$Text = Guictrlread($input1)
guictrlsetdata($Button1, $Text)

Bin gerade bissl verwirrt^^ Also es war SetData oder SetState.

[Lawliet]

Jedesmal nen neuen Button erstellen? 0o

[BladeTiger12]

Sorry bin anfänger und habs gelöscht wo ich deins gesehen habe

$Edit: hab deins ausprobiert funktioniert
$Edit: brauch noch viel übung in Autoit... weis aber nicht wie ich es lernen soll
$Edit: will so einen Updater in google gibts viel aber nix funktioniert bei mir über FTP
$Edit: Websiten

[Njahs]

Originally Posted by BladeTiger12

$Edit: brauch noch viel übung in Autoit... weis aber nicht wie ich es lernen soll

[Freddy​]

Originally Posted by Lawliet!

$Text = Guictrlread($input1)
guictrlsetdata($Button1, $Text)

Bin gerade bissl verwirrt^^ Also es war SetData oder SetState.

Wenn man es so macht wie du geschrieben hast fängt der Button an zu blinken also ist das suboptimal

[lolkop]

les halt vorher den namen des buttons aus, und editiere nur bei ungleichheit.

[Lawliet]

Originally Posted by Snivel

Wenn man es so macht wie du geschrieben hast fängt der Button an zu blinken also ist das suboptimal

Wie soll es denn sonnst gehen? Weiß nicht ob es geht und kann es gerade auch nicht testen. Aber evl. gehts ja mit

$msg = Guigetmsg()
If $msg = $input1 then 
$Text = Guictrlread($input1)
guictrlsetdata($Button1, $Text)
endif

[lolkop]

wie bereits erwähnt... erst aktuellen name auslesen, und bei ungleichheit ändern...

code als einfacher automat aufgebaut:

Dim $btnName[2] = ['Text1','Text2'], $activeName=False
GUICreate('blubb', 100, 50, Default, Default, 0x10C80000)
$btn = GUICtrlCreateButton($btnName[$activeName], 10, 10, 105, 30)

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case $btn
			$activeName = Not $activeName
		Case Else
			If GUICtrlRead($btn)<>$btnName[$activeName] Then GUICtrlSetData($btn, $btnName[$activeName])
	EndSwitch
WEnd

Edit:
Bevor wieder fragen kommen, hier eine mögliche lösung mit input <.<:

Dim $data
GUICreate('blubb', 126, 40, Default, Default, 0x10C80000)
$btn = GUICtrlCreateButton('', 0, 0, 126, 20)
$input = GUICtrlCreateInput('001', 0, 20, 126, 20)

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case Else
			$data = GUICtrlRead($input)
			If GUICtrlRead($btn)<>$data Then GUICtrlSetData($btn, $data)
	EndSwitch
WEnd

[Lawliet]

Originally Posted by lolkop

wie bereits erwähnt... erst aktuellen name auslesen, und bei ungleichheit ändern...

code als einfacher automat aufgebaut:

Dim $btnName[2] = ['Text1','Text2'], $activeName=False
GUICreate('blubb', 100, 50, Default, Default, 0x10C80000)
$btn = GUICtrlCreateButton($btnName[$activeName], 10, 10, 105, 30)

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case $btn
			$activeName = Not $activeName
		Case Else
			If GUICtrlRead($btn)<>$btnName[$activeName] Then GUICtrlSetData($btn, $btnName[$activeName])
	EndSwitch
WEnd

Edit:
Bevor wieder fragen kommen, hier eine mögliche lösung mit input <.<:

Dim $data
GUICreate('blubb', 126, 40, Default, Default, 0x10C80000)
$btn = GUICtrlCreateButton('', 0, 0, 126, 20)
$input = GUICtrlCreateInput('001', 0, 20, 126, 20)

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case Else
			$data = GUICtrlRead($input)
			If GUICtrlRead($btn)<>$data Then GUICtrlSetData($btn, $data)
	EndSwitch
WEnd

Okay, beste Lösung. So würde ich es übernehmen.

[°Incinerate]

Hey Lawliet!

Thx für deine Hilfe ...

weißt du auch wie ich eine Variable1 alle x Sekunden überprüfen wird, und wenn sie nicht mit wert1 übereinstimmt, dass das dann geändert wird?

[Lawliet]

Das hat lolkp schon geschrieben

Originally Posted by lolkop

wie bereits erwähnt... erst aktuellen name auslesen, und bei ungleichheit ändern...

code als einfacher automat aufgebaut:

Dim $btnName[2] = ['Text1','Text2'], $activeName=False
GUICreate('blubb', 100, 50, Default, Default, 0x10C80000)
$btn = GUICtrlCreateButton($btnName[$activeName], 10, 10, 105, 30)

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case $btn
			$activeName = Not $activeName
		Case Else
			If GUICtrlRead($btn)<>$btnName[$activeName] Then GUICtrlSetData($btn, $btnName[$activeName])
	EndSwitch
WEnd

Edit:
Bevor wieder fragen kommen, hier eine mögliche lösung mit input <.<:

Dim $data
GUICreate('blubb', 126, 40, Default, Default, 0x10C80000)
$btn = GUICtrlCreateButton('', 0, 0, 126, 20)
$input = GUICtrlCreateInput('001', 0, 20, 126, 20)

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case Else
			$data = GUICtrlRead($input)
			If GUICtrlRead($btn)<>$data Then GUICtrlSetData($btn, $data)
	EndSwitch
WEnd

[°Incinerate]

sry hab nur alles bisschen überflogen ^^

@lolkop

ich scheitere grade 5 Inputübernahmen auf den Buttons zu übertragen ^^

[lolkop]

das wären doch nur 5 abfragen in deiner main schleife o0

Edit:
hier mal ein beispiel für einen mehr oder weniger dynmaischen code, welcher für <$buttons> (hier gerade 10) Inputs und Buttons die aufgabe erledigt:

Dim $data, $buttons=10, $btn[$buttons], $input[$buttons]
GUICreate('blubb', 126, 40*$buttons, Default, Default, 0x10C80000)
For $i=0 To $buttons-1
	$btn[$i] = GUICtrlCreateButton('', 0, 40*$i, 126, 20)
	$input[$i] = GUICtrlCreateInput('001', 0, 40*$i+20, 126, 20)
Next

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case Else
			For $i=0 To $buttons-1
				$data = GUICtrlRead($input[$i])
				If GUICtrlRead($btn[$i])<>$data Then GUICtrlSetData($btn[$i], $data)
			Next
	EndSwitch
WEnd