Beiträge von GtaSpider
-
-
-
Hallo
Dann müsste die Audio Datei ja diesen Pfad haben:
c:\Dokumente und Einstellungen\XXX\Lokale Einstellungen\Tempabout.mp3
anstatt
c:\Dokumente und Einstellungen\XXX\Lokale Einstellungen\Temp\about.mp3Und das ist doch nicht sinn der Sache oder?^^
Mfg Spider
-
Hallo
Bzw so:
[autoit]Case $Button1
[/autoit]
SoundPlay("")
GUIDelete($dlgAbout)
Vor nem exit ist das ja egalAußerdem sollte das hier nicht klappen?: SoundPlay( @TempDir & "about.mp3")
Probier mal das so aus: SoundPlay( @TempDir & "\about.mp3")Mfg Spider
-
-
Hallo
Meinst du so?
Spoiler anzeigen
[autoit]#include <ScreenCapture.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Dim $screen
$screen = "\ScreenShot.jpg"
HotKeySet("{printscreen}", "screen")
HotKeySet("!{printscreen}", "screenwindow")While 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
WEndFunc screen()
[/autoit] [autoit][/autoit] [autoit]
_ScreenCapture_Capture(_FileName(@MyDocumentsDir & $screen))
MsgBox(64, "Info", "Screenshot wurde gespeichert in: " & @MyDocumentsDir)
EndFunc ;==>screenFunc screenwindow()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$window = WinGetHandle("")
_ScreenCapture_CaptureWnd(_FileName(@MyDocumentsDir & $screen), $window)
MsgBox(64, "Info", "Screenshot wurde gespeichert in: " & @MyDocumentsDir)
EndFunc ;==>screenwindowFunc _FileName($sFilePath)
[/autoit]
If Not FileExists($sFilePath) Then Return $sFilePath
Local $sExt = StringTrimLeft($sFilePath, StringInStr($sFilePath, ".", -1, -1))
Local $sFile = StringTrimRight($sFilePath, StringLen($sExt) + 1)
Local $i = 0
While 1
$i += 1
If Not FileExists($sFile & $i & "." & $sExt) Then Return $sFile & $i & "." & $sExt
WEnd
EndFunc ;==>_FileNameMfg Spider
-
Hm, das ist Gorillaz - Clint Eastwood lol
-
Ich weiss das Limp bitzkit das mal gefeatet hat
Und die Bitzkit version find ich besser -
Hallo
Dann benutze man das hier: http://www.autoitscript.com/forum/index.php?showtopic=54048&hl=microphone
Mgf Spider
-
Hallo
[autoit]$endtime = $starttime+1
[/autoit]
$vlc=(@Scriptdir&"\Temp\VLC\vlc.exe")
$param = ' -vout image --start-time '&$starttime&' --stop-time '&$endtime&' --image-out-format jpg --image-out-ratio 20 --image-out-prefix screen "'&$videofile_path&'"'
Run($vlc&$param)Mfg Spider
-
Hallo
Du willst nur die Lautstärke ändern? Guck dir mal SoundSetWavevolume() an
Mfg Spider
-
Hallo
Warum willst du das unbedingt mit Delphi machen? Warum nicht direkt mit AutoIt?
Das beispiel ist zwar schon etwas älter, funktioniert aber noch einwandfrei (Liest in dem Beispiel den momentan gespielten Track von winamp)Spoiler anzeigen
[autoit]#include<FontConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include<WindowsConstants.au3>
#NoTrayIconAutoItSetOption("TrayMenuMode", 1)
[/autoit] [autoit][/autoit] [autoit]
Dim $Title, $OldTitle
Dim $song
Dim $hwnd$exititem = TrayCreateItem("Exit")
[/autoit] [autoit][/autoit] [autoit]
TraySetState()
$hwnd = GUICreate("Winamp Tool", 500, 20, 1300, 20, $WS_POPUP, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW))
GUISetBkColor(0xFF0000)
GUISetState()While 1
[/autoit] [autoit][/autoit] [autoit]
$msg = TrayGetMsg()
Select
Case $msg = $exititem
ExitLoop
EndSelect
$OldTitle = $Title
AutoItSetOption("WinTitleMatchMode", 4)$Title = WinGetTitle("classname=Winamp v1.x")
[/autoit] [autoit][/autoit] [autoit]
If $OldTitle <> $Title Then
$song = ParseTitle($Title)
$rgn = CreateTextRgn($hwnd, $song, 20, "Arial", 1000)
SetWindowRgn($hwnd, $rgn)
EndIf
WEnd
Func ParseTitle($Title)
$loc = StringInStr($Title, ". ")
$ParsedTitle = StringTrimLeft($Title, $loc + 1)
$loc = StringInStr($ParsedTitle, " - Winamp", 0, -1)
$ParsedTitle = StringLeft($ParsedTitle, $loc)
Return $ParsedTitle
EndFunc ;==>ParseTitle
Func SetWindowRgn($h_win, $rgn)
DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $rgn, "int", 1)
EndFunc ;==>SetWindowRgn;Func CombineRgn(ByRef $rgn1, ByRef $rgn2)
[/autoit] [autoit][/autoit] [autoit]
; DllCall("gdi32.dll", "long", "CombineRgn", "long", $rgn1, "long", $rgn1, "long", $rgn2, "int", 2)
;EndFuncFunc CreateTextRgn(ByRef $CTR_hwnd, $CTR_Text, $CTR_height, $CTR_font = "Microsoft Sans Serif", $CTR_weight = 1000)
[/autoit] [autoit][/autoit] [autoit]
Local Const $OUT_CHARACTER_PRECIS = 2
Local Const $CLIP_DEFAULT_PRECIS = 0
Local Const $PROOF_QUALITY = 2
Local Const $FIXED_PITCH = 1
Local Const $RGN_XOR = 3If $CTR_font = "" Then $CTR_font = "Microsoft Sans Serif"
[/autoit]
If $CTR_weight = -1 Then $CTR_weight = 1000
Local $gdi_dll = DllOpen("gdi32.dll")
Local $CTR_hDC = DllCall("user32.dll", "int", "GetDC", "hwnd", $CTR_hwnd)
Local $CTR_hMyFont = DllCall($gdi_dll, "hwnd", "CreateFont", "int", $CTR_height, "int", 0, "int", 0, "int", 0, _
"int", $CTR_weight, "int", 0, "int", 0, "int", 0, "int", $ANSI_CHARSET, "int", $OUT_CHARACTER_PRECIS, _
"int", $CLIP_DEFAULT_PRECIS, "int", $PROOF_QUALITY, "int", $FIXED_PITCH, "str", $CTR_font)
Local $CTR_hOldFont = DllCall($gdi_dll, "hwnd", "SelectObject", "int", $CTR_hDC[0], "hwnd", $CTR_hMyFont[0])
DllCall($gdi_dll, "int", "BeginPath", "int", $CTR_hDC[0])
DllCall($gdi_dll, "int", "TextOut", "int", $CTR_hDC[0], "int", 0, "int", 0, "str", $CTR_Text, "int", StringLen($CTR_Text))
DllCall($gdi_dll, "int", "EndPath", "int", $CTR_hDC[0])
Local $CTR_hRgn1 = DllCall($gdi_dll, "hwnd", "PathToRegion", "int", $CTR_hDC[0])
Local $CTR_rc = DllStructCreate("int;int;int;int")
DllCall($gdi_dll, "int", "GetRgnBox", "hwnd", $CTR_hRgn1[0], "ptr", DllStructGetPtr($CTR_rc))
Local $CTR_hRgn2 = DllCall($gdi_dll, "hwnd", "CreateRectRgnIndirect", "ptr", DllStructGetPtr($CTR_rc))
DllCall($gdi_dll, "int", "CombineRgn", "hwnd", $CTR_hRgn2[0], "hwnd", $CTR_hRgn2[0], "hwnd", $CTR_hRgn1[0], "int", $RGN_XOR)
DllCall($gdi_dll, "int", "DeleteObject", "hwnd", $CTR_hRgn1[0])
DllCall("user32.dll", "int", "ReleaseDC", "hwnd", $CTR_hwnd, "int", $CTR_hDC[0])
DllCall($gdi_dll, "int", "SelectObject", "int", $CTR_hDC[0], "hwnd", $CTR_hOldFont[0])
DllClose($gdi_dll)
Return $CTR_hRgn2[0]
EndFunc ;==>CreateTextRgnMfg Spider
-
Hallo und herzlich willkommen
Doch, es gibt natürlich eine Kommandozeile in AutoIt
Benutze einfach $CMDLINE[1] für den ersten Kommandozeilenparameter $CMDLINE[2] für den zweiten Parameter usw usw.
$CMDLINE[0] zeigt an wie viele Parameter insgesamt mitgeliefert wurden.Mfg Spider
-
Hallo
Wobei wenn das ein Log file ist, könntest du auch einfach _FileREadToArray machen
Mfg Spider
-
Hallo
MD5 ist ne checksumme kein Verschlüsselungsalgo
Er will wahrscheinlich gucken, ob wirklich auch alles da ist.
Benutze dazu InetGetSize und FileGetSize und vergleiche dann die WerteMfg Spider
-
Hallo
Sag das doch^^ Oh, dass hast du ja
Sorry, dachte du dachtest er will sowas wie ProcessListMfg Spider
-
Hallo
Greenhorn: Er will nur die PID eines Prozesses herrausfinden, nicht sowas wie ProcessList()^^
Mfg Spider
-
Hallo
Das ist mein Airflow, obwohl Vorne im Gehäuse keine extra Luftschlitze sind:
Spoiler anzeigen
[Blockierte Grafik: http://www.noctua.at/images/faqs/nh_u12_case_airflow_1.jpg]
Mein Lüfter ist der hier: http://www.alternate.de/html/product/C…rticleId=205927
Ich hab ihn vor nem halben Jahr für 39,90€ gekauft ><An meinem MOtherboard liegt es mit hoher Wahrscheinlichkeit nicht
Asus P5W DH Deluxe, mit neuster FWHm, gut. Dann werde ich wohl die tage mal auf 2,7 oder so gehen müssen.
Mfg Spider
-
3.2.13.6 (30th July, 2008) (Beta)
AutoIt:
- Fixed #475: StringSplit() mit Flag 2 und leeren delimiter funktioniert nicht richtig.
- Fixed #464: Beispielscript für GuiCtrlCreateAVI() funktioniert nicht unter Vista.- Added #328: StringToASCIIArray(), StringFromASCIIArray() Funktionen.
- Added: Neuer Flag für Run()/RunAs() #415 (Neue Constants.au3 Konstante wurde hinzugefügt : $STDIO_INHERIT_PARENT).
- Added: Neuer Flag für alle Run funktionen für eine bessere CUI Komptabilität. (Neue Constants.au3 Konstante wurde hinzugefügt : $RUN_CREATE_NEW_CONSOLE).- Changed #393: Dokumentiert, dass SoundSetWaveVolume() unter Vista anders funktioniert.
- Changed: PCRE regular expression engine wurde auf Version 7.7 geupdated.UDFs:
- Added: _ExcelHorizontalAlignSet, _ExcelFontSetProperties, _ExcelBookAttach (litlmike)
- Fixed: Excel Beispiele
- Added: _WinAPI_SetEndOfFile, _WinAPI_SetFilePointer (Zedna)
- Fixed #465: _DateTimeSplit wenn Sekunden wegelassen wurden, war default -1. Jetzt ist default 0Aut2Exe:
- Added #460: Mehr wortreichere UPX errors. -
Hallo
So hab mir mal diese Q6600 OC guide durchgelesen.
Erstmal was ich hab:
Lüfter von Sharkoon, 40€
Q6600 G0 Stepping, übertaktet auf 3,2 ghz, seit grade eben auf 3,0 ghz
Asus P5W DH DeluxeMein Asus Probe II sagt mir das ich im idle ne kuschlige temp von 38°C im CPU hab.
So jetzt starte ich mal CoreTemp und der sagt mir ich hab 59°
Takte CPU vorsichtshalber mal auf 3,0 runterWie dem auch sei, hab jetzt mal Stress test (Prime95) angemacht und da auf Small FFTs gemacht.
Asus sagt 58°C, CoreTemp sagt nach 4 Minuten 78°C nach 10 Minuten 82°C.
Huch?! 82°C? Hm, war da nicht sowas? Ach ja, Intel CPUs schalten sich ab 80°C aus^^
Ok dachte ich mir, was ist hier los? Hab stresstest sofort beendet, und innerhalb von 2 Sekunden wurden aus den 82°C bei CoreTemp 65°C.Kann das alles sein?! Falls ja ist das beängstigend. Beim Crysis zocken zeigt CoreTemp nach 10 Minuten 68°C was ja auch sehr beängstigend ist.
Momentan (seit 5 Minuten nichts mehr gestresst^^) läuft
Core 1 @ 55°C
Core 2 @ 54°C
Core 3 @ 50°C
Core 4 @ 52°CWähre super wenn hier jemand klarheit reinbringen könnte
Vielen Dank, Mfg Spider
Edit: Hier noch ein Screenshot:
Spoiler anzeigen