Danke für die super schnelle Antwort. Hat mir echt geholfen.
Beiträge von whoami
-
-
Hallo,
ich habe eine Frage bezüglich Buttons.
Ist es möglich mit einem Button einen Button zu
erstellen und diesen dann zu benutzen?
Ich habe mal angefangen mit ein bisschen Code, mein
Problem ist nur, ich kann einen Button erstellen ihn aber nicht
ansprechen da er ja immer mit der gleichen Variable erstellt wird.Spoiler anzeigen
[autoit]GUICreate("GSD",310,300) ; Erstellt die Gui
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW) ; Macht die Gui sichtbar$x = 10
[/autoit] [autoit][/autoit] [autoit]
$y = 30; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
[/autoit] [autoit][/autoit] [autoit]$Button_1 = GUICtrlCreateButton("New File", $x, $y, 100)
[/autoit] [autoit][/autoit] [autoit]
$btn_Exit = GUICtrlCreateButton("Exit", 200, $y, 100)Func NewButton_N()
[/autoit] [autoit][/autoit] [autoit]
$y = $y + 30
$Button2 = GUICtrlCreateButton("...", $x, $y, 100)
EndFuncWhile 1
[/autoit]
$msg = GUIGetMsg()
Select
Case $msg = $Button_1
NewButton_N()
Case $msg = $btn_Exit
Exit
EndSelect
WEndDanke schonmal für eure Hilfe
-
Danke für die Antworten, jetzt hab ich es hinbekommen ;D
-
Hallo Autoit Forum,
ich habe eine Frage bezüglich der Verwendung einer VM als Server.
MEIN PC --> Windows 7 --> Client
MEIN PC --> Windows 7 --> VM --> Windows 7 --> ServerIch habe das problem das wenn ich mein client Skript ausführe
die Anfrage nicht am server ankommt. Kann mir da vll. jemand
helfen.Client:
$ip = 'IP Adresse vom in VM laufendem Windows 7'
TCPStartUp()Do
$TCPConnect = TCPConnect($ip,45670)
If @error Then
MsgBox(64,"Error!","konnte nicht verbinden :")
EndIf
Until $TCPConnect <> -1$TCPSend = TCPSend($TCPConnect,"First text on moon")
TCPShutdown()
Server:
$ip = 'IP Adresse vom in VM laufendem Windows 7'
TCPStartUp()$MainSocket = TCPListen($ip, 45670, 100 )
while 1
$TCPAccept = TCPAccept($MainSocket)
If @error then
MsgBox(64,"Error","error")
EndIf
WEnd$TCPRecv = TCPRecv($TCPAccept,2048)
If $TCPRecv <> "" Then
MsgBox(0,"Info","Text erhalten :" & $TCPRecv)
EndIfTCPShutdown()
Schonmal Danke