Is n ganz nettes Skript.
Beiträge von PrideRage
-
-
Ich find es ist dir gut gelungen.
-
Is dir gut gelungen, jedoch suffixt dein Speichern die endung nicht.
Schau dir mal folgende FileSaveDialog funktion an, die ich auf AutoItScript.com gefunden habe.Spoiler anzeigen
[autoit]Func _FileSaveDialog($sTitle, $sInitDir, $sFilter = 'All (*.*)', $iOpt = 0, $sDefaultFile = "", $sDefaultExt = "", $mainGUI = 0)
[/autoit] [autoit][/autoit] [autoit]
Local $iFileLen = 65536
Local $iFlag = BitOR(BitShift(BitAND($iOpt, 2), -10), BitShift(BitAND($iOpt, 16), 3))
Local $asFLines = StringSplit($sFilter, '|'), $asFilter[$asFLines[0] * 2 + 1]
Local $i, $iStart, $iFinal, $suFilter = ''
$asFilter[0] = $asFLines[0] * 2
For $i = 1 To $asFLines[0]
$iStart = StringInStr($asFLines[$i], '(', 0, 1)
$iFinal = StringInStr($asFLines[$i], ')', 0, -1)
$asFilter[$i * 2 - 1] = StringStripWS(StringLeft($asFLines[$i], $iStart - 1), 3)
$asFilter[$i * 2] = StringStripWS(StringTrimRight(StringTrimLeft($asFLines[$i], $iStart), StringLen($asFLines[$i]) - $iFinal + 1), 3)
$suFilter = $suFilter & 'byte[' & StringLen($asFilter[$i * 2 - 1]) + 1 & '];byte[' & StringLen($asFilter[$i * 2]) + 1 & '];'
Next
Local $uOFN = DllStructCreate('dword;int;int;ptr;ptr;dword;dword;ptr;dword' & _
';ptr;int;ptr;ptr;dword;short;short;ptr;ptr;ptr;ptr;ptr;dword;dword')Local $usTitle = DllStructCreate('byte[' & StringLen($sTitle) + 1 & ']')
[/autoit] [autoit][/autoit] [autoit]
Local $usInitDir = DllStructCreate('byte[' & StringLen($sInitDir) + 1 & ']')
Local $usFilter = DllStructCreate($suFilter & 'byte')
Local $usFile = DllStructCreate('char[' & $iFileLen & ']')
Local $usExtn = DllStructCreate('byte[' & StringLen($sDefaultExt) + 1 & ']')
For $i = 1 To $asFilter[0]
DllStructSetData($usFilter, $i, $asFilter[$i])
NextDllStructSetData($usTitle, 1, $sTitle)
[/autoit] [autoit][/autoit] [autoit]
DllStructSetData($usInitDir, 1, $sInitDir)
DllStructSetData($usFile, 1, $sDefaultFile)
DllStructSetData($usExtn, 1, $sDefaultExt)
DllStructSetData($uOFN, 1, DllStructGetSize($uOFN))
DllStructSetData($uOFN, 2, $mainGUI)
DllStructSetData($uOFN, 4, DllStructGetPtr($usFilter))
DllStructSetData($uOFN, 7, 1)
DllStructSetData($uOFN, 8, DllStructGetPtr($usFile))
DllStructSetData($uOFN, 9, $iFileLen)
DllStructSetData($uOFN, 12, DllStructGetPtr($usInitDir))
DllStructSetData($uOFN, 13, DllStructGetPtr($usTitle))
DllStructSetData($uOFN, 14, $iFlag)
DllStructSetData($uOFN, 17, DllStructGetPtr($usExtn))
DllStructSetData($uOFN, 23, BitShift(BitAND($iOpt, 32), 5))$ret = DllCall('comdlg32.dll', 'int', 'GetSaveFileName', 'ptr', DllStructGetPtr($uOFN))
[/autoit]
If $ret[0] Then
Return StringStripWS(DllStructGetData($usFile, 1), 3)
Else
SetError(1)
Return ""
EndIf
EndFunc ;==>_FileSaveDialogMfG. PrideRage
-
Warum stellst du hier ein Projekt Closed-Source rein ?
Hier wird eh niemand Skripte klauen. -
Hallo.
[autoit]
FileReadLine wird so benutzt.
FileReadLine ( "filehandle/filename" [, line] )
Die erste Linie ist 1, die letzte -1
Beispiel:$file = FileOpen("test.txt", 0)
[/autoit][autoit][/autoit][autoit]; Check if file opened for reading OK
[/autoit][autoit][/autoit][autoit]
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf$line = FileReadLine($file, 2)
[/autoit][autoit][/autoit][autoit]
If @error = -1 Then Exit
MsgBox(0, "Line read:", $line)FileClose($file)
[/autoit]MfG. PrideRage
-
Hallo
[autoit]
Hier n kleines Beispiel:$msg = GUIGetMsg()
[/autoit]
Switch $msg
Case $DeinButton
_DeineFunc()
EndswitchMfG. PrideRage
Edit: Zu langsam
-
Hallo.
[autoit]
Also, ich glaube du willst, dass wenn du den Pfad \Test\Unterordner\Datei.txt hast, den Laufwerksbuchstaben davon erhhalten, richtig ?
Das ist easy.
Die Funktion lautet _PathFull() und benötigt #include <File.au3>
In der Funktion gibst du einfach deinen Pfad an, und er Spuckt den ganzen Pfad aus.
Beispiel:#include <File.au3>
[/autoit]
$path = "\Programme\AutoIt3\"
MsgBox(0,0, _PathFull($path))MfG. PrideRage
-
Sieht schön aus.
Wenn man es noch schneller macht funzt auch Hypnose
MfG. PrideRage -
Hallo.
Alles was ich dir zeigen kann ist dieser Wikipedia
Artikel.
Ich hoffe mal, es bringt dich ein wenig weiter.
MfG. PrideRage -
Also dieser Visualizer ist ja nicht wirklich besser als der normale.
Das einzige, was ich erkennen konnte an veränderungen war die langweilige Sinuskurve und
unheimlich viel gelagge.
An deiner Stelle würd ich's ma fixen.
MfG. PrideRage -
Ja, vielen Dank.
War wohl wirklich nur n Denkfehler von mir -
Hallo.
Ich habe ein Problem, welches ich nicht lösen kann.
Ich habe folgendes Skript:Spoiler anzeigen
[autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit]Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]Global $hGui, $width = 600, $height = $width, $i = 100
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$hGui = GUICreate("GDI+", $width, $height, -1, -1)
GUISetOnEvent(-3, "_disp")
GUISetState()_GDIPlus_Startup()
[/autoit] [autoit][/autoit] [autoit]
Global $hGraphics = _GDIPlus_GraphicsCreateFromHWND($hGui)
Global $hBitmap = _GDIPlus_BitmapCreateFromGraphics($width, $height, $hGraphics)
Global $hBackbuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
Global $hPen = _GDIPlus_PenCreate(0xFF990001, 2)_GDIPlus_GraphicsClear($hBackbuffer)
[/autoit] [autoit][/autoit] [autoit]While 1
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_GraphicsClear($hBackbuffer)
_GDIPlus_GraphicsDrawLine($hBackbuffer, $i, 200, 240, 250, $hPen)
_GDIPlus_GraphicsDrawImage($hGraphics, $hBitmap, 0, 0)
$i += 1
WEndFunc _disp()
[/autoit]
_GDIPlus_GraphicsDispose($hGraphics)
_GDIPlus_GraphicsDispose($hBackbuffer)
_GDIPlus_BitmapDispose($hBitmap)
_GDIPlus_PenCreate($hPen)
_GDIPlus_Shutdown()
GUIDelete($hGui)
Exit
EndFuncUnd ich möchte nun den Punkt $i in GraphicsDrawLine so verändern, dass er von 100 bis 300 geht, und wenn
der Punkt $i bei 300 ist, dass er von 300 bis 100 geht, und immer so weiter.Meine Frage: Wie mache ich das ?
Ich versuche es schon seit Tagen, und nie klappt was.Ich freue mich auf antworten.
MfG. PrideRage
-
Nettes Skript.
Wird man bestimmt sehr oft benutzen können.
MfG. PrideRage -
Raupi
Du weisst alles oder ^^? -
Ich hab ma die Dateien für Aut2Exe hochgeladen.
Link: Entfernt
Sag bescheid, wenn du die Datei hast, damit ich sie von meinem Server löschen kann -
Guck mal ob bei dir unter Auto3 der Ordner Aut2Exe ist.
-
eukalyptus
Lol, das funzt ja
Danke -
Sehr schön.
Finds ne klasse idee, und es ist auch gut umgesetzt. -
Hallo.
Du hast bestimmt irgendein Fehler in den Optionen, denn SciTE
kann die Datei nicht finden.
Welche, weiss ich nicht, aber schau mal unter ..\AutoIt3\SciTE\ in den .properties dateien nach.
Oder unter C:\Dokumente und Einstellungen\Name\ die SciTEUser.properties.
Da is bestimmt was falsch. -
Um Bilder in Icon so wandeln kannst du Pixillion Image Converter nutzen.
Einfach die Trial Version downloaden, weniger Funktionen, aber dafür ist die nutzungs dauer nicht begrenzt.