Ich habe einen Bug gefunden :). Also wenn man z.b Hallo schreibt, die Schriftgröße auf 72 ändert und danach die Schriftart ändert, ist die Schrift wieder ganz klein.
Beiträge von DeepRed92
-
-
-
Dankeschön
-
Also es sind nur die beiden Bilder hier:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. -
Joa habs jetzt so:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>Global $status
[/autoit] [autoit][/autoit] [autoit]
Global $TransZahl$TransSpeed = 3
[/autoit] [autoit][/autoit] [autoit]
$x = 234
$y = 150$Form1 = GUICreate("Form1", $x, $y)
[/autoit] [autoit][/autoit] [autoit]
WinSetTrans($Form1, "", 100)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit] [autoit][/autoit] [autoit]
_overtrans()
WEndFunc _overtrans()
[/autoit]
$Curser = GUIGetCursorInfo($Form1)
If IsArray($Curser) Then
If $Curser[0] + 7 > 0 And $Curser[0] - 0 < $x And $Curser[1] + 0 > 0 And $Curser[1] - 0 < $y Then
If $status = False Then
$status = True
For $i = 100 To 255 Step $TransSpeed
$Curser = GUIGetCursorInfo($Form1)
If $Curser[0] + 7 < 0 Or $Curser[0] - 0 > $x Or $Curser[1] + 0 < 0 Or $Curser[1] - 0 > $y Then
ExitLoop
EndIf
Sleep(2)
WinSetTrans($Form1, "", $i)
Next
$TransZahl = $i
EndIf
Else
If $status = True Then
$status = False
For $i = $TransZahl To 100 Step -$TransSpeed
Sleep(2)
WinSetTrans($Form1, "", $i)
Next
EndIf
EndIf
EndIf
EndFunc ;==>_overtransAber das flackert manchmal. Ist das bei euch auch so?
-
Hallo,
ich habe einen Script, das nur normal ist, wenn der Mauszeiger über dieses Fenster ist. Ansonsten ist es Transparent. Wie kann man es nun so machen, das es mitten in der ForSchleife abbricht, wenn der Mauszeiger nicht über der GUI ist. Hier mal ein Beispielscript:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>Global $status
[/autoit] [autoit][/autoit] [autoit]$x = 234
[/autoit] [autoit][/autoit] [autoit]
$y = 150$Form1 = GUICreate("Form1", $x, $y)
[/autoit] [autoit][/autoit] [autoit]
WinSetTrans($Form1, "", 100)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit] [autoit][/autoit] [autoit]
_overtrans()
WEndFunc _overtrans()
[/autoit]
$Curser = GUIGetCursorInfo($Form1)
If IsArray($Curser) Then
If $Curser[0] + 7 > 0 And $Curser[0] - 0 < $x And $Curser[1] + 0 > 0 And $Curser[1] - 0 < $y Then
If $status = False Then
$status = True
$TransSpeed = 5
For $i = 100 To 255 Step $TransSpeed
Sleep(2)
WinSetTrans($Form1, "", $i)
Next
EndIf
Else
If $status = True Then
$status = False
$TransSpeed = 5
For $i = 255 To 100 Step -$TransSpeed
Sleep(2)
WinSetTrans($Form1, "", $i)
Next
EndIf
EndIf
EndIf
EndFunc ;==>_overtrans -
Kann man die Bilder auch nur Transparenz machen und übereinanderlegen?
-
Joa jetzt weiß ich woran das lag...man kann keine Wuzel aus negativen Zahlen ziehen
Edit: Zu langsam gewesen
-
Hallo,
bei mir funktioniert die UDF:
[autoit]$PQ = _Mathe_PQ(0.002, 3)
[/autoit][autoit][/autoit][autoit]MsgBox(0, "", $PQ[0] & @CRLF & $PQ[1])
[/autoit][autoit][/autoit][autoit]Func _Mathe_PQ($P, $Q)
[/autoit][autoit][/autoit][autoit]
Dim $Result[2]$Result[0] = (-$P / 2) + Sqrt((-$P / 2) ^ 2 - $Q)
[/autoit]
$Result[1] = (-$P / 2) - Sqrt((-$P / 2) ^ 2 - $Q)
Return $Result
EndFunc ;==>_Mathe_PQNicht. Weiß jemand woran das liegen könnte?
-
-
also aus 2 Bildern soll einer werden. Wenn ich ein schwarzen Bild und ein Weißes habe sollen die zu einem werden also Grau. Ich hoffe ihr versteht was ich meine
-
Hallo,
wie kann man mit AutoIt aus 2 Bilder einen machen?
-
Hi MehmeX,
Zu deiner 1. Frage hier:
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <IE.au3>Local $old
[/autoit] [autoit][/autoit] [autoit]$oIE = ObjCreate("Shell.Explorer.2")
[/autoit] [autoit][/autoit] [autoit]GUICreate("Embedded Web control Test", 640, 500)
[/autoit] [autoit][/autoit] [autoit]
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 600, 360)
$GUI_Button_Back = GUICtrlCreateButton("Zurück", 10, 10, 100, 30)
$GUI_Button_Forward = GUICtrlCreateButton("Vor", 120, 10, 100, 30)
$GUI_Button_Home = GUICtrlCreateButton("Home", 230, 10, 100, 30)
$GUI_Button_Stop = GUICtrlCreateButton("Stoppen", 330, 10, 100, 30)
$url = GUICtrlCreateInput("", 10, 450, 500, 20)GUISetState()
[/autoit] [autoit][/autoit] [autoit]$oIE.navigate("http://www.autoit.de")
[/autoit] [autoit][/autoit] [autoit]$Init = TimerInit()
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg()Switch $msg
[/autoit]
Case $GUI_EVENT_CLOSE
ExitLoop
Case $GUI_Button_Home
$oIE.navigate("http://www.autoit.de")
Case $GUI_Button_Back
$oIE.GoBack
Case $GUI_Button_Forward
$oIE.GoForward
Case $GUI_Button_Stop
$oIE.Stop
Case $url
$oIE.navigate(GUICtrlRead($url))
EndSwitch
If TimerDiff($Init) > 100 Then
$Location = $oIE.LocationURL
If $Location <> $old Then
GUICtrlSetData($url, $Location)
$old = $Location
EndIf
$Init = TimerInit()
EndIf
WEndDie 2. kann ich dir jetzt nicht beantworten
Edit: Vielleicht ist hier für dich was drin:
Spoiler anzeigen
Code
Alles anzeigenName MemberType Definition ---- ---------- ---------- ClientToWindow Method void ClientToWindow (int, int) ExecWB Method void ExecWB (OLECMDID, OLECMDEXECOPT, Variant, Variant) GetProperty Method Variant GetProperty (string) GoBack Method void GoBack () GoForward Method void GoForward () GoHome Method void GoHome () GoSearch Method void GoSearch () Navigate Method void Navigate (string, Variant, Variant, Variant, Variant) Navigate2 Method void Navigate2 (Variant, Variant, Variant, Variant, Variant) PutProperty Method void PutProperty (string, Variant) QueryStatusWB Method OLECMDF QueryStatusWB (OLECMDID) Quit Method void Quit () Refresh Method void Refresh () Refresh2 Method void Refresh2 (Variant) ShowBrowserBar Method void ShowBrowserBar (Variant, Variant, Variant) Stop Method void Stop () AddressBar Property bool AddressBar () {get} {set} Application Property IDispatch Application () {get} Busy Property bool Busy () {get} Container Property IDispatch Container () {get} Document Property IDispatch Document () {get} FullName Property string FullName () {get} FullScreen Property bool FullScreen () {get} {set} Height Property int Height () {get} {set} HWND Property int HWND () {get} Left Property int Left () {get} {set} LocationName Property string LocationName () {get} LocationURL Property string LocationURL () {get} MenuBar Property bool MenuBar () {get} {set} Name Property string Name () {get} Offline Property bool Offline () {get} {set} Parent Property IDispatch Parent () {get} Path Property string Path () {get} ReadyState Property tagREADYSTATE ReadyState () {get} RegisterAsBrowser Property bool RegisterAsBrowser () {get} {set} RegisterAsDropTarget Property bool RegisterAsDropTarget () {get} {set} Resizable Property bool Resizable () {get} {set} Silent Property bool Silent () {get} {set} StatusBar Property bool StatusBar () {get} {set} StatusText Property string StatusText () {get} {set} TheaterMode Property bool TheaterMode () {get} {set} ToolBar Property int ToolBar () {get} {set} Top Property int Top () {get} {set} TopLevelContainer Property bool TopLevelContainer () {get} Type Property string Type () {get} Visible Property bool Visible () {get} {set} Width Property int Width () {get} {set} -
Von hier her:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. -
Hier:
Spoiler anzeigen
AU3_AutoItSetOption
AU3_BlockInput
AU3_CDTray
AU3_ClipGet
AU3_ClipPut
AU3_ControlClick
AU3_ControlCommand
AU3_ControlDisable
AU3_ControlEnable
AU3_ControlFocus
AU3_ControlGetFocus
AU3_ControlGetHandle
AU3_ControlGetPosHeight
AU3_ControlGetPosWidth
AU3_ControlGetPosX
AU3_ControlGetPosY
AU3_ControlGetText
AU3_ControlHide
AU3_ControlListView
AU3_ControlMove
AU3_ControlSend
AU3_ControlSetText
AU3_ControlShow
AU3_ControlTreeView
AU3_DriveMapAdd
AU3_DriveMapDel
AU3_DriveMapGet
AU3_IniDelete
AU3_IniRead
AU3_IniWrite
AU3_Init
AU3_IsAdmin
AU3_MouseClick
AU3_MouseClickDrag
AU3_MouseDown
AU3_MouseGetCursor
AU3_MouseGetPosX
AU3_MouseGetPosY
AU3_MouseMove
AU3_MouseUp
AU3_MouseWheel
AU3_Opt
AU3_PixelChecksum
AU3_PixelGetColor
AU3_PixelSearch
AU3_ProcessClose
AU3_ProcessExists
AU3_ProcessSetPriority
AU3_ProcessWait
AU3_ProcessWaitClose
AU3_RegDeleteKey
AU3_RegDeleteVal
AU3_RegEnumKey
AU3_RegEnumVal
AU3_RegRead
AU3_RegWrite
AU3_Run
AU3_RunAsSet
AU3_RunWait
AU3_Send
AU3_SendA
AU3_Shutdown
AU3_Sleep
AU3_StatusbarGetText
AU3_ToolTip
AU3_WinActivate
AU3_WinActive
AU3_WinClose
AU3_WinExists
AU3_WinGetCaretPosX
AU3_WinGetCaretPosY
AU3_WinGetClassList
AU3_WinGetClientSizeHeight
AU3_WinGetClientSizeWidth
AU3_WinGetHandle
AU3_WinGetPosHeight
AU3_WinGetPosWidth
AU3_WinGetPosX
AU3_WinGetPosY
AU3_WinGetProcess
AU3_WinGetState
AU3_WinGetText
AU3_WinGetTitle
AU3_WinKill
AU3_WinMenuSelectItem
AU3_WinMinimizeAll
AU3_WinMinimizeAllUndo
AU3_WinMove
AU3_WinSetOnTop
AU3_WinSetState
AU3_WinSetTitle
AU3_WinSetTrans
AU3_WinWait
AU3_WinWaitA
AU3_WinWaitActive
AU3_WinWaitActiveA
AU3_WinWaitClose
AU3_WinWaitCloseA
AU3_WinWaitNotActive
AU3_WinWaitNotActiveA
AU3_error
DllCanUnloadNow
DllGetClassObject
DllRegisterServer
DllUnregisterServer -
Ja. So:
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <IE.au3>$oIE = ObjCreate("Shell.Explorer.2")
[/autoit] [autoit][/autoit] [autoit]GUICreate("Embedded Web control Test", 640, 500)
[/autoit] [autoit][/autoit] [autoit]
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 600, 360)
$GUI_Button_Back = GUICtrlCreateButton("Zurück", 10, 10, 100, 30)
$GUI_Button_Forward = GUICtrlCreateButton("Vor", 120, 10, 100, 30)
$GUI_Button_Home = GUICtrlCreateButton("Home", 230, 10, 100, 30)
$GUI_Button_Stop = GUICtrlCreateButton("Stoppen", 330, 10, 100, 30)
$url = GUICtrlCreateInput("", 10, 450, 500, 20)GUISetState()
[/autoit] [autoit][/autoit] [autoit]$oIE.navigate("http://www.autoit.de")
[/autoit] [autoit][/autoit] [autoit]$Init = TimerInit()
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg()Switch $msg
[/autoit]
Case $GUI_EVENT_CLOSE
ExitLoop
Case $GUI_Button_Home
$oIE.navigate("http://www.autoit.de")
Case $GUI_Button_Back
$oIE.GoBack
Case $GUI_Button_Forward
$oIE.GoForward
Case $GUI_Button_Stop
$oIE.Stop
EndSwitch
If TimerDiff($Init) > 100 Then
$Location = $oIE.LocationURL
If GUICtrlRead($url) <> $Location Then
GUICtrlSetData($url, $Location)
EndIf
$Init = TimerInit()
EndIf
WEnd -
Hi MehmeX,
das sollte dir weiterhelfen
:Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <IE.au3>$oIE = ObjCreate("Shell.Explorer.2")
[/autoit] [autoit][/autoit] [autoit]GUICreate("Embedded Web control Test", 640, 500)
[/autoit] [autoit][/autoit] [autoit]
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 600, 360)
$GUI_Button_Back = GUICtrlCreateButton("Zurück", 10, 10, 100, 30)
$GUI_Button_Forward = GUICtrlCreateButton("Vor", 120, 10, 100, 30)
$GUI_Button_Home = GUICtrlCreateButton("Home", 230, 10, 100, 30)
$GUI_Button_Stop = GUICtrlCreateButton("Stoppen", 330, 10, 100, 30)
$url = GUICtrlCreateInput("", 10, 450, 500, 20)GUISetState()
[/autoit] [autoit][/autoit] [autoit]$oIE.navigate("http://www.autoit.de")
[/autoit] [autoit][/autoit] [autoit]$Init = TimerInit()
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg()Switch $msg
[/autoit]
Case $GUI_EVENT_CLOSE
ExitLoop
Case $GUI_Button_Home
$oIE.navigate("http://www.autoit.de")
Case $GUI_Button_Back
$oIE.GoBack
Case $GUI_Button_Forward
$oIE.GoForward
Case $GUI_Button_Stop
$oIE.Stop
EndSwitch
If TimerDiff($Init) > 100 Then
GUICtrlSetData($url, $oIE.LocationURL)
$Init = TimerInit()
EndIf
WEnd -
Weil es ziemlich doof aussieht, wenn bei exe dateien eine Fehlermeldung wie "Variable used without declared" erscheint. Die Fehlermeldungsfenster will ich nämlich selber machen
-
Hallo,
wie kann man alle Fehlermeldungen von AutoIt abschalten? Z.b wenn eine Variable nicht deklariert ist usw.
Das Script soll sich danach zwar beenden, aber nicht über Fehler benachrchtigen. -
Hi Simon,
Meinst du es so:
[autoit]#include <GUIConstantsEx.au3>
[/autoit][autoit][/autoit][autoit]
#include <WindowsConstants.au3>$Form1 = GUICreate("Form1", 150, 100, -1, -1, -1, BitOR($WS_EX_APPWINDOW, $WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
[/autoit][autoit][/autoit][autoit]
GUISetState(@SW_SHOW)While 1
[/autoit][autoit][/autoit][autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit]
WEnd
