Und wie komme ich an die Zahl 4 ran? Müsste das nicht mit _WinAPI_GetSysemSymetrics gehen? ![]()
Beiträge von DeepRed92
-
-
Zitat
Also bei XP paßt es genau.
Dann müsste das wohl an Vista liegen!?
Zitatwas ist denn wenn du deine gui ohne rahmen machst?
Dann passt es ganz genau. Also müsste ich jetzt versuchen die breite der Fensterrahmen in Pixel herauszufinden. Weiß jemand wie das genau gehen soll?
-
Hallo,
ich bekomme es nicht hin, unter Vista (keine Ahnung ob das auf Xp funktioniert) eine GUI, direkt über die Traybar zu positionieren. Es ist leider wenige Pixel zu weit nach unten verschoben. Ich denke mal, dass das an dem Fensterrahmen liegt. Wie bekomme ich die breite der Fensterrahmen heraus?
[Blockierte Grafik: http://deepsoftware.spacequadrat.de/Downloads/www.AutoIt.de/GUI_Traybar.jpg]
Ich denke mal so etwas geht mit _WinAPI_GetSystemMetrics? Aber welche Parameter brauche ich dafür?Die "7"?
Spoiler anzeigen
[autoit]#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.0.0
[/autoit] [autoit][/autoit] [autoit]
Author: Burak Keskin ©Script Function:
[/autoit] [autoit][/autoit] [autoit]
Template AutoIt script.#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]; Script Start - Add your code below here
[/autoit] [autoit][/autoit] [autoit]#include <WindowsConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>_StreamGUI()
[/autoit] [autoit][/autoit] [autoit]Func _StreamGUI()
[/autoit] [autoit][/autoit] [autoit]
Opt("WinTitleMatchMode", 4)
Local $TrayPos = WinGetPos("classname=Shell_TrayWnd")
Opt("WinTitleMatchMode", 1)Local $ReturnValue
[/autoit] [autoit][/autoit] [autoit]
Local $TestWindow = GUICreate("Audiodatei streamen", 306, 29, -1, -1, -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
Local $WinPos = WinGetPos($TestWindow)
Local $ClientSize = WinGetClientSize($TestWindow)
GUIDelete()Global $StreamGUI_Handle = GUICreate("Audiodatei streamen", 306, 29, @DesktopWidth - 306, @DesktopHeight - $TrayPos[3] - 29 - ($WinPos[3] - $ClientSize[1]), -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
[/autoit] [autoit][/autoit] [autoit]
WinSetOnTop($StreamGUI_Handle, "", 1)
GUICtrlCreateLabel("Link:", 8, 8, 27, 17)
GUICtrlSetTip(-1, 'Geben Sie bitte hier die Adresse zur Audiodatei an. Beispiel: "www.musik.de/sänger/interpret.mp3"' & @CRLF _
& "Diese Funktion dient dazu, Audiodateien direkt ohne Download abzuspielen (streamen).", "Link", 1, 1)
Global $StreamGUI_Input = GUICtrlCreateInput(ClipGet(), 40, 4, 225, 19)
Global $StreamGUI_Button = GUICtrlCreateButton("Ok", 272, 4, 27, 19, $BS_DEFPUSHBUTTON)
GUISetState(@SW_SHOW)While 1
[/autoit]
$nMsg = GUIGetMsg(1)
Switch $nMsg[1]
Case $StreamGUI_Handle
Switch $nMsg[0]
Case $GUI_EVENT_CLOSE
GUIDelete($StreamGUI_Handle)
Return SetError(1, 0, 0)
Case $StreamGUI_Input
$ReturnValue = GUICtrlRead($StreamGUI_Input)
GUIDelete($StreamGUI_Handle)
Return $ReturnValue
Case $StreamGUI_Button
$ReturnValue = GUICtrlRead($StreamGUI_Input)
GUIDelete($StreamGUI_Handle)
Return $ReturnValue
EndSwitch
EndSwitch
WEnd
EndFunc ;==>_StreamGUIDanke schonmal für die Hilfe :).
-
Hi,
ich hab mal was von Programmiersprachen der künstlichen Intelligenz gehört. Ich weiß jetzt aber nicht, wie sie heißen.

-
Also Du kannst ja mit Java anfangen. Die Vorteile dabei sind halt, das es fast genauso schnell ist wie c++ und auf jedem Betriebssystem funktioniert. Wer Java kann, wird bei C++, VB, C# keine schwierigkeiten haben, da diese Sprachen ziemlich ähnlich sind.
Falls Du dich für Java entscheidest:
1. Lade dir Java JDK runter
2. Installiere BlueJ -
Hallo noise,
Dein Script ist wirklich genial. Es ist klein und übersichtlich. Ich hätte da noch eine Idee, falls Du noch vorhast, den Player zu erweitern:
Kannst Du es vielleicht so machen, das man auch die die Radios einzelner Interpreten hören kann? Also so wie hier:
http://www.lastfm.de/listen/artist/Afroman/similarartistsIch hoffe Du weißt, was ich meine

Grüße
-
Hallo,
weiß jemand von euch, wie man den Windows Media Player 11 so einstellen kann, dass es nach dem Start sofort die Playlist abspielt? Gibt es dafür bestimmte Startparameter?
Danke im Voraus!
-
Das liegt an autoitscript.com. Die Updatesuche von AutoIt.de funktionierte auch nicht. Aber jetzt sollte es gehen!?
-
Hallo funkey,
ich finde, dass Deine UDF immer besser und besser wird

Schau mal, ist das ein Bug?
[Blockierte Grafik: http://deepsoftware.spacequadrat.de/Downloads/www.AutoIt.de/1.jpg]
klickt man jetzt aber auf eins der letzten 3 Tabs passiert das:
[Blockierte Grafik: http://deepsoftware.spacequadrat.de/Downloads/www.AutoIt.de/2.jpg]
Grüße
-
Soweit ich weiß, wird eine Schleife doch nicht durch ContinueCase beendet oder? Wird dadurch nicht die Schleife nur wiederholt?
-
Hallo,
da ich bald auch ein Java-Spezialist bin
(Schule), würde ich mal gerne wissen, ob man AutoIt Scripte mit Java Programmen zusammmenarbeiten lassen könnte. Also so in etwa wie bei Konsolen-Anwendungen oder Dlls. Weiß jemand ob so was möglich ist? -
-
Hi,
wieso machst Du nicht einfach folgendes:
[autoit]DeineFunktionBzwMethode()
[/autoit][autoit][/autoit][autoit]Func DeineFunktionBzwMethode()
[/autoit]
Switch $Zahl
Case 1
MsgBox(0, "", "Zahl = 1")
Case 2
MsgBox(0, "", "Zahl = 2")
Return 0 ;Gibt einfach eine 0 wieder und bricht die Funktion/Methode ab.
MsgBox(0, "", "das wird nichtmehr angezeigt")
EndSwitch
EndFunc ;==>DeineFunktionBzwMethode -
Guten Abend,
mir ist diese GUI aufgefallen:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. Ich finde die Stelle, wo die 2 Buttons sind total gut gelungen. Weiß jemand, wie man das unter AutoIt umsetzen könnte?
Grüße
-
Zitat
Probiere mal:
#AutoIt3Wrapper_Run_Obfuscator=y
#Obfuscator_Parameters=/sf /sv /om /cs=0 /cn=0Hallo UEZ, leider kann ich den Obfuscator nicht benutzen, da dadurch ein paar Funktionen bei meinem Script danach nicht mehr funktionieren.
Code-###2 Obfuscation Error: Found Execute() statement which will lead to problems running your obfuscated script.Geht das denn auch anders?
Grüße
-
Guten Abend,
ich bin es gewohnt lange Variablennamen zu verwendet. Beispiel: $GUI1_Label_Setting_Bla_BLa_Blalalaala. Wie ich gehört (gelesen) habe, sind lange Variable in AutoIt langsamer. Meine Frage, gibt es schon ein Script, das die Variable in ganz kurze Variable umbennent? Beispiel: $GUI1_Label_Setting_Bla_BLa_Blalalaala wird zu $1.
Grüße
-
Zitat
Das dürfte wohl jetzt Off-Topic sein, aber kann mir bitte jemand in kurzen Worten erklären, wie ich zwei Scripte miteinander kommunizieren lassen kann. ich dachte so an - Wert in *.ini schreiben und vom 2. Script auslesen lassen. Aber das dürfte wohl zu lange dauern.
Bin über eine Antwort dankbar.Hi, dafür gibt es auch eine UDF. Ich glaube sie heißt MessageHandler. Schau einfach mal im Englischen forum nach

-
Hallo,
es gibt im Englischen Forum eine "CoProc.au3" UDF. Versuchs doch mal damit. Ich glaube das ist genau das was Du suchst. Aber es ist kein Multithreading. Es führt nur eine Funktion in einen anderen Prozess aus ;).
-
Zitat
Du hattest doch schon so einen Thread

[ offen ] GUI Mit SchwerkraftJa schon, aber ich wollte, das hierbei auch die Formel v=a*t benutzt wird. Die normale Erdanzeihungskraft hat ja eine beschleunigung von 9.81 m/s². Wie kann ich das umsetzen?
-
Klar funktioniert mein Beispiel *Mein Fehler*. Ich hatte mir das so vorgestellt. WinMove soll immer in einer Schritten nach unten bewegt werden und die Geschwindigkeit per Sleep festgestellt werden. Das ist besser, da die GUI dann gleichmäßig nach unten bewegt wird. Weiß jemand, wie man das bewerkstelligen könnte?
-
Hallo,
wie kann ich eine GUI mit WinMove so bewegen, das es von oben fällt und immer schneller nach unten fällt?
Das sollte mit der Formel v=a*t gehen oder nicht?
Ich habs versucht, weiß aber nicht, wie man es richtig umsetzen kann. Helft mir bitte!Danke schonmal!!
[autoit]#include <GUIConstantsEx.au3>
[/autoit][autoit][/autoit][autoit]
#include <WindowsConstants.au3>$Form1 = GUICreate("Form1", 50, 30, 100, 0, -1, BitOR($WS_EX_TOOLWINDOW, $WS_EX_WINDOWEDGE))
[/autoit][autoit][/autoit][autoit][/autoit][autoit]
GUISetState(@SW_SHOW)For $i = 0 To 700
[/autoit][autoit][/autoit][autoit]
WinMove($Form1, "", 100, $i * _SpeedUp(5, $i))
Sleep(100)
NextWhile 1
[/autoit][autoit][/autoit][autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit][autoit][/autoit][autoit]
WEndFunc _SpeedUp($a, $t) ;v=a*t ; Geschindigkeit = Beschleunigung * Zeit
[/autoit]
Return $a * $t
EndFunc ;==>_SpeedUp