Mit dem ResHacker einfach wieder rauslöschen?
Ne das ist ja noch unpratischer, da ich meine Scripte dann ohne UPX kompilieren muss.
Beiträge von DeepRed92
-
-
Zitat
vermutlich hat bugfix recht und es ist bei beiden sans srif aber ich vermute das filezilla dieses mit ClearType anzeigt und autoit nicht
Hmm da ist Du höchstwahrscheinlich Recht. Ich habe ClearType aktiviert und es ist nur bei AutoIt anders. Bei Firefox, Explorer usw. nutzen die Labels ClearType.
Edit: Vielleicht finde ich hier was sinnvoles: http://social.msdn.microsoft.com/Forums/en-US/v…97-c7ff3fad670d
Edit2: Ok es hilft mir doch nicht weiter
. -
Hmmm ja das stimmt schon...
[Blockierte Grafik: http://download.lima-city.de/deepred/Bilder/539200746822804513.jpg]
[Blockierte Grafik: http://download.lima-city.de/deepred/Bilder/191403798682339988.jpg]
Aber die Schrift von Fz ist immer noch besser. Nicht so lang gezogen.
Naja wenn jemand einen besseren Lösungsweg kennt bitte posten, ansonsten würde mir das hier auch reichen
-
Zitat
In AutoIt wird als Default: MS Sanse Serif verwendet.
M.E. wird auch von FZ diese Schriftart verwendet. Ich sehe keinen auffälligen Unterschied.Doch da gibt es einen auffälligen Unterschied. Die Schrift von FZ ist viel weicher:
[Blockierte Grafik: http://download.lima-city.de/deepred/Bilder/191403798682339988.jpg]
-
Zitat
Danke. Diese Schriftart ist doch auch mal wieder sehr interessant
.ZitatEdit: Oder meinst du die Standard-Schriftart von Autoit-Programmen? Hängt die nicht von den Windows-Einstellungen ab?
Ja ich meine auch die Standard-Schriftart von AutoIt Programmen. Keine Ahnung ob das von Windows.-Einstellungen abhängig ist
. -
Hallo,
neulich ist mir die Schrift von FileZilla aufgefallen:
[Blockierte Grafik: http://download.lima-city.de/deepred/Bilder/796962454520415436.jpg]
Es ist zwar fast das selbe wie der von AutoIt, doch irgendwie trotzdem leserlicher. Als ob es weicher wäre. Weiß jemand welche Schriftart auf diesem Foto verwendet wird und welche Schriftart AutoIt als Standard hat?
Vielen Dank im Voraus
-
Weiß das jetzt niemand oder wie jetzt? :pinch:
-
Das ist bei mir auch so. Drückt man erst F5 und dannach Strg+T (Tidy) oder anderen HotKeys, werden weitere Instanzen des Scripts gestartet. Liegt wahrscheinlich an der Plug-In-Funktion von SciTE.
-
Wie kann ich einen Script ohne irgendeinen Icon kompilieren?
-
Also überprüft Dein Updater lokal, ob die Datei exisitiert und die Version?
Wenn ja, ist die Idee nicht mal soo schlecht .Ich hatte gerade eine Idee zum Updaten:
Mein Programm lädt eine gezippte Datei herunter und entpackt sie. Dabei werden einfach alle vorherigen überschrieben. Die gezippte Dateien befinden sich auf einer Webspace mit folgenden Namen:
Update_1.7z
Update_2.7z
usw..Wird ein Update heruntergeladen, wird die heruntergeladene Updatenummer in eine Ini eingetragen. Z.b. LastUpdate=2. Nach Updates wird dann so überprüft: InetGetSize(".....\Update_3.7z"). Ist diese nicht vorhanden, gibt es auch keine neue Version.
Was haltet ihr von dieser Idee? Praktisch? Unpraktisch?
-
Hallo,
ich weiß jetzt nicht ob es hier reinpasst.
Also bis jetzt hatte ich bei meinen Programm die folgende Updatefunktion benutzt:
Mit FileGetVersion und per IniDatei im Internet, wird verglichen, ob es eine neuere Version vorhanden ist. Das klappt soweit gut, aber wenn neue Komponente dazu kommen, ist das Updaten mit dieser Variante ein Problem...Welche Variante würdet Ihr dafür benutzen? Mit fehlt leider der Ansatz...
-
Hallo,
wie kann man per AutoIt die Ordneransicht von Ordnern verändern? Kacheln, Symbole usw...?
-
Zitat
Es ist aber mehr als unwahrscheinlich, dass sie in den nächsten 2 - 3 Wahlperioden eine Verbreitung erreichen, die den Sprung in den Bundestag ermöglichen würde.
Hier steht, das sie schon im Bundestag sind
: http://6.gp/b5x -
Zitat
Die Seite , die ich dort verlinkt habe ist dein Thema :-DIch glaube das klappt dann nur für den jenigen der das Benutzt hat
...bei mir klappt dein Link auch . -
Hallo,
ich wollte mal eure Meinung zu der Piratenpartei Deutschland hören. Ich hab mir mal das hier durchgelesen:
http://www.piratenpartei.de/navigation/politik/unsere-ziele
In sehr vielen Punkten haben die meiner Meinung nach Recht. Was meint ihr dazu? -
Zitat
Cool
Geht das bei Jeder Url und bleibt das für immer !?Bei mir hat es mit jeder URL geklappt. Ich denke mal solange die URLs genutzt werden, werden sie auch nicht gelöscht. Auf der Seite hab ich leider nichts dazu gefunden.
-
-
Ja. Mit BugFix's Version, klappt das auch auf Computer ohne AutoIt, sobald dein Script Compiliert wurde.
Hier noch ein Vorschlag. Habs mal etwas angepasst:
Spoiler anzeigen
[autoit]$Source = 'For $FNLoop = 1 to 99' & @CRLF & _
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
'Tooltip ($FNLoop,0,0)' & @CRLF & _
'Sleep(20)' & @CRLF & _
'Next'_RunPlugIn($Source)
[/autoit] [autoit][/autoit] [autoit]; #FUNCTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name...........: _RunPlugIn
; Description ...: Führt einen Plug-In aus
; Syntax.........: _RunPlugIn($Source)
; Parameters ....: $Source - Source in AutoIt
; Author ........: Burak Keskin <[email='Burak.keskin@arcor.de'][/email]>
; ===============================================================================================================================
Func _RunPlugIn($Source)Local $StartLoop_Line, $EndLoop_Line
[/autoit] [autoit][/autoit] [autoit]$Split1 = StringSplit($Source, @LF)
[/autoit] [autoit][/autoit] [autoit]For $NextLoop1 = 1 To $Split1[0]
[/autoit] [autoit][/autoit] [autoit]$Split2 = StringSplit($Split1[$NextLoop1], "=")
[/autoit] [autoit][/autoit] [autoit]
$Split3 = StringSplit($Split1[$NextLoop1], " ")
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] <> "For" And $Split3[1] <> "If" Then
If $Split2[0] > 1 Then
Assign(StringTrimLeft(StringTrimRight($Split2[1], 1), 1), Execute(StringTrimLeft(StringReplace($Split2[2], @CR, ""), 1)))
ElseIf $Split2[0] = 1 Then
Execute(StringReplace($Split1[$NextLoop1], @CR, ""))
EndIf
EndIf
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] = "For" Then
$StartLoop_Line = $NextLoop1
For $NextLoop2 = $StartLoop_Line To $Split1[0]
If StringInStr($Split1[$NextLoop2], "Next") Then
$EndLoop_Line = $NextLoop2
ExitLoop
EndIf
Next
$From = $Split3[4]
$To = $Split3[6]
$StartLoop_Line += 1
$EndLoop_Line -= 1
$VarName = $Split3[2]
For $FNLoop = Number($From) To Number($To)
For $NextLoop3 = Number($StartLoop_Line) To Number($EndLoop_Line)
Execute(StringReplace($Split1[$NextLoop3], @CR, ""))
Next
Next
$NextLoop1 = $EndLoop_Line
EndIf
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] = "If" Then
$StartLoop_Line2 = $NextLoop1
For $NextLoop2 = $StartLoop_Line To $Split1[0]
If StringInStr($Split1[$NextLoop2], "EndIf") Then
$EndLoop_Line2 = $NextLoop2
ExitLoop
EndIf
Next
$Var1 = $Split3[2]
$Var2 = $Split3[4]
$StartLoop_Line2 += 1
$EndLoop_Line2 -= 1
$IfType = $Split3[3]
If StringLeft(Eval("Var1"), 1) = "$" Then
$Var1 = Eval(StringTrimLeft(Eval("Var1"), 1))
Else
$Var1 = Eval("Var1")
EndIf
If StringLeft(Eval("Var2"), 1) = "$" Then
$Var2 = Eval(StringTrimLeft(Eval("Var2"), 1))
Else
$Var2 = Eval("Var2")
EndIf
If $IfType = "=" Then
If String($Var1) = String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
ElseIf $IfType = "<" Then
If String($Var1) < String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
ElseIf $IfType = ">" Then
If String($Var1) > String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
ElseIf $IfType = "<>" Then
If String($Var1) <> String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
EndIf
$NextLoop1 = $EndLoop_Line2
EndIf
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] = "While" ThenEndIf
[/autoit] [autoit][/autoit] [autoit]Next
[/autoit]
EndFunc ;==>_RunPlugIn -
So ungefähr müsste es aussehen:
Spoiler anzeigen
[autoit]$Source = '$Answer1 = MsgBox(262212, "Hallo", "Klick any button ^^")' & @CRLF _
[/autoit] [autoit][/autoit] [autoit]
& '$Answer2 = MsgBox(262212, "Hallo", "Klick any button ^^")' & @CRLF _
& 'If $Answer1 = $Answer2 Then' & @CRLF _
& ' MsgBox(0, "", "Sie haben 2x das selbe gewählt.")' & @CRLF _
& 'EndIf'
_RunPlugIn($Source); #FUNCTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name...........: _RunPlugIn
; Description ...: Führt einen Plug-In aus
; Syntax.........: _RunPlugIn($Source)
; Parameters ....: $Source - Source in AutoIt
; Author ........: Burak Keskin <[email='Burak.keskin@arcor.de'][/email]>
; ===============================================================================================================================
Func _RunPlugIn($Source)
Local $StartLoop_Line, $EndLoop_Line
$Split1 = StringSplit($Source, @LF)
For $NextLoop1 = 1 To $Split1[0]
$Split2 = StringSplit($Split1[$NextLoop1], "=")
$Split3 = StringSplit($Split1[$NextLoop1], " ")
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] <> "For" And $Split3[1] <> "If" Then
If $Split2[0] > 1 Then
Assign(StringTrimLeft(StringTrimRight($Split2[1], 1), 1), Execute(StringTrimLeft(StringReplace($Split2[2], @CR, ""), 1)))
ElseIf $Split2[0] = 1 Then
Execute(StringReplace($Split1[$NextLoop1], @CR, ""))
EndIf
EndIf
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] = "For" Then
$StartLoop_Line = $NextLoop1
For $NextLoop2 = $StartLoop_Line To $Split1[0]
If StringInStr($Split1[$NextLoop2], "Next") Then
$EndLoop_Line = $NextLoop2
ExitLoop
EndIf
Next
$From = $Split3[4]
$To = $Split3[6]
$StartLoop_Line += 1
$EndLoop_Line -= 1
$VarName = $Split3[2]
For $FNLoop = Number($From) To Number($To)
For $NextLoop3 = Number($StartLoop_Line) To Number($EndLoop_Line)
Execute(StringReplace($Split1[$NextLoop3], @CR, ""))
Next
Next
$NextLoop1 = $EndLoop_Line
EndIf
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] = "If" Then
$StartLoop_Line2 = $NextLoop1
For $NextLoop2 = $StartLoop_Line To $Split1[0]
If StringInStr($Split1[$NextLoop2], "EndIf") Then
$EndLoop_Line2 = $NextLoop2
ExitLoop
EndIf
Next
$Var1 = $Split3[2]
$Var2 = $Split3[4]
$StartLoop_Line2 += 1
$EndLoop_Line2 -= 1
$IfType = $Split3[3]
If StringLeft(Eval("Var1"), 1) = "$" Then
$Var1 = Eval(StringTrimLeft(Eval("Var1"), 1))
Else
$Var1 = Eval("Var1")
EndIf
If StringLeft(Eval("Var2"), 1) = "$" Then
$Var2 = Eval(StringTrimLeft(Eval("Var2"), 1))
Else
$Var2 = Eval("Var2")
EndIf
If $IfType = "=" Then
If String($Var1) = String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
ElseIf $IfType = "<" Then
If String($Var1) < String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
ElseIf $IfType = ">" Then
If String($Var1) > String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
ElseIf $IfType = "<>" Then
If String($Var1) <> String($Var2) Then
For $NextLoop4 = $StartLoop_Line2 To $EndLoop_Line2
Execute(StringReplace($Split1[$NextLoop4], @CR, ""))
Next
EndIf
EndIf
$NextLoop1 = $EndLoop_Line2
EndIf
;---------------------------------------------------------------------------------------------------------------
;///////////////////////////////////////////////////////////////////////////////////////////////////////////////
;---------------------------------------------------------------------------------------------------------------
If $Split3[1] = "While" ThenEndIf
[/autoit]
Next
EndFunc ;==>_RunPlugIn -
Ja. Selber Funktionen erstellen. Kann aber sehr aufwändig werden.