Ist es eigentlich möglich hinter einer Schrift einen Schatten einzubauen?
meinselite
meinselite
$gui = GUICreate('Schatten', 300, 100)
GUICtrlSetDefBkColor(-2) ; Transparenter Hintergrund
GUISetFont(26)
$label1_Schatten = GUICtrlCreateLabel('Schatten', 5, 0)
$label1 = GUICtrlCreateLabel('Schatten', 0, 0)
GUICtrlSetColor($label1_Schatten, 0xC0C0C0)
GUISetState(@SW_SHOW)
While GUIGetMsg() <> -3
WEnd
$gui = GUICreate('Schatten', 300, 100)
GUICtrlSetDefBkColor(-2) ; Transparenter Hintergrund
GUISetFont(26)
$label1_Schatten = GUICtrlCreateLabel('Schatten', 2, 2)
$label1 = GUICtrlCreateLabel('Schatten', 0, 0)
GUICtrlSetColor($label1_Schatten, 0xC0C0C0)
GUICtrlSetFont($label1_Schatten,26,400,2)
GUISetState(@SW_SHOW)
While GUIGetMsg() <> -3
WEnd
$Link = "http://www.speedtest.qsc.de/10MB.qsc" $path = @ScriptDir & "10MB.qsc" _Download($Link,$path,$Label1) Func _Download($dURL,$dFilename,$dOutput) $dGet = InetGet($dURL,$dFilename,0,1) Do $dInfo = InetGetInfo($dGet,1) GUICtrlSetData($dOutput,$dInfo) Until InetGetInfo($dGet,2) EndFunc
auf den ersten blick würde ich das hier ändernQuote:
was mach ich falsch ? vorhin hat es noch geklappt dann hab ich irgendwas verändert :
in meinem script ist label1 deklariert !Code:$Link = "http://www.speedtest.qsc.de/10MB.qsc" $path = @ScriptDir & "10MB.qsc" _Download($Link,$path,$Label1) Func _Download($dURL,$dFilename,$dOutput) $dGet = InetGet($dURL,$dFilename,0,1) Do $dInfo = InetGetInfo($dGet,1) GUICtrlSetData($dOutput,$dInfo) Until InetGetInfo($dGet,2) EndFunc
achsoQuote:
auf den ersten blick würde ich das hier ändern
@ScriptDir & "\10MB.qsc"
was geht denn nicht?
$dInfo = InetGetInfo($dGet,1) GUICtrlSetData($dOutput,$dInfo)
Quote:
das script soll in zb E:\E Media\downloads\ reinkommen, indem er die namen des ordners lest.
#include <File.au3>
#include <Array.au3>
Local $FileList = _FileListToArray("E:\E Media\downloads\") ;alles auslesen
;~ Local $FileList = _FileListToArray("E:\E Media\downloads\", "*", 1) ; nur dateien auslesen
;~ Local $FileList = _FileListToArray("E:\E Media\downloads\", "*", 2) ; nur ordner auslesen
If @error = 1 Then
MsgBox(0, "", "No Folders Found.")
Exit
EndIf
If @error = 4 Then
MsgBox(0, "", "No Files Found.")
Exit
EndIf
_ArrayDisplay($FileList, "$FileList")
;~ For $i = 0 To UBound($FileList)-1
;~ ConsoleWrite($FileList[$i] & @CR)
;~ Next
Func _Download($dURL,$dFilename,$dOutput) $dGet = InetGet($dURL,$dFilename,1,1) Do $dInfo = InetGetInfo($dGet,0) GUICtrlSetData($dOutput,$dInfo) sleep(900) Until InetGetInfo($dGet,2) Return True InetClose($dGet) EndFunc
FileRead() ? ^^Quote:
Das per Pixelsearch umzusetzen, wird sehr aufwändig und ziemlich ungenau.
Besser kannst du in dem Zielprogramm die Adresse den entsprechenden Strings mit CE finden, oder wenn es um eine Website geht, den HTML-Code per RegEx oder Stringbetween nach der entsprechenden Stelle durchsuchen.
#include <File.au3>
Func _DownloadAll($aURL,$aFilename)
$aI = 0
FileWrite("temp.txt",$aURL)
$aLines = _FileCountLines("temp.txt")
FileWrite("tempnames.txt",$aFilename)
$nLines = _FileCountLines("tempnames.txt")
Do
$aI = $aI + 1
$tURL = FileReadLine("temp.txt",$aI)
$tName = FileReadLine("tempnames.txt",$aI)
InetGet($tURL,$tName,1,1)
Until $aI = $aLines
Return True
EndFunc
sehr interessantes script. aber ich kann nicht mit imput es machen (damit ich die adresse wechseln kann)Quote:
PHP Code:#include <File.au3>
#include <Array.au3>
Local $FileList = _FileListToArray("E:\E Media\downloads\") ;alles auslesen
;~ Local $FileList = _FileListToArray("E:\E Media\downloads\", "*", 1) ; nur dateien auslesen
;~ Local $FileList = _FileListToArray("E:\E Media\downloads\", "*", 2) ; nur ordner auslesen
If @error = 1 Then
MsgBox(0, "", "No Folders Found.")
Exit
EndIf
If @error = 4 Then
MsgBox(0, "", "No Files Found.")
Exit
EndIf
_ArrayDisplay($FileList, "$FileList")
;~ For $i = 0 To UBound($FileList)-1
;~ ConsoleWrite($FileList[$i] & @CR)
;~ Next
?
ohne die anführungszeichen..Quote:
sehr interessantes script. aber ich kann nicht mit imput es machen (damit ich die adresse wechseln kann)
ich habe:
$adress = GUICtrlRead($Input1)
Local $FileList = _FileListToArray("$adress")
und findet keine datei.