Moin moin,
möchte gerne die Schriftenauswahl ohne den Schriftgrad, größe und anderen Parametern aufrufen.
brauche nur die Schriftenauswahl.
Gibt es für _ChooseFont noch Parameter wo diese Dinge weggelassen werden ?
Habe da in der Hilfe nichts gefunden.
mfg
oh-ha
Moin moin,
betreibe ein kleines Forum wo auch Sehbehinderte reinschauen.
Nach dem mir diese per PN Mitgeteilt haben das es für sie nur sehr schwer Lesbar ist habe ich mal Versucht dies
mit Windows Bordmitteln in die Reihe zu bekommen.
Den Style neu machen war mir einfach zu Aufwändig daher dachte ich mir das es mit Autoit wohl zu machen sein müßte.
Kann ja sein das einer von euch noch Verbesserungen hat wie man es noch anders oder besser machen könnte.
Bevor ich es auf die User loslasse.
Hier mal das Skript:
#RequireAdmin
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]Global $Colors, $Size, $Face, $FullScreen, $EnableOnStartup, $ZoomFactor, $Invert
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Tool für Sehbehinderte", 439, 440, 448, 138)
GUISetBkColor(0xFFFFFF)
$Button1 = GUICtrlCreateButton("Starten", 154, 397, 123, 33)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Button2 = GUICtrlCreateButton("Beenden", 286, 397, 123, 33)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Button3 = GUICtrlCreateButton("Zurücksetzen", 144, 331, 147, 33)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("wird die Seite geöffnet", 176, 256, 209, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Internet Explorer", 117, 98, 166, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("In", 24, 256, 21, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("Internetseite", 159, 10, 118, 28)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Checkbox1 = GUICtrlCreateCheckbox("Farbe aus", 21, 137, 145, 17)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Checkbox2 = GUICtrlCreateCheckbox("Schrift groß", 22, 169, 145, 25)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Checkbox3 = GUICtrlCreateCheckbox("Invertiert mit Lupe", 199, 209, 217, 25)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Checkbox4 = GUICtrlCreateCheckbox("meine Schrift", 21, 210, 145, 25)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Checkbox5 = GUICtrlCreateCheckbox("Fullsceen", 199, 170, 145, 25)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Checkbox6 = GUICtrlCreateCheckbox("Tastaturnavigation an", 199, 134, 217, 25)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$www = GUICtrlCreateInput("www.autoit.de", 56, 40, 313, 32)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Combo1 = GUICtrlCreateCombo("Zoom", 56, 249, 105, 25)
GUICtrlSetData(-1, "100%|125%|150%|175%|200%|225%|250%|275%|300%|325%|350%|375%|400%")
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
$Group3 = GUICtrlCreateGroup("", 8, 80, 417, 305)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
If Not FileExists ("C:\Temp\sehhilfe.ini") Then
$Colors = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings", "Always Use My Colors" )
$Size = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings", "Always Use My Font Size" )
$Face = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings", "Always Use My Font Face" )
$FullScreen = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "FullScreen" )
$EnableOnStartup = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\CaretBrowsing", "EnableOnStartup" )
$ZoomFactor = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom", "ZoomFactor" )
$Invert = RegRead ( "HKEY_CURRENT_USER\Software\Microsoft\ScreenMagnifier", "Invert" )
IniWrite("C:\Temp\sehhilfe.ini", "Settings", "Always Use My Colors", $Colors)
IniWrite("C:\Temp\sehhilfe.ini", "Settings", "Always Use My Font Size", $Size)
IniWrite("C:\Temp\sehhilfe.ini", "Settings", "Always Use My Font Face", $Face)
IniWrite("C:\Temp\sehhilfe.ini", "Main", "FullScreen", $FullScreen)
IniWrite("C:\Temp\sehhilfe.ini", "CaretBrowsing", "EnableOnStartup", $EnableOnStartup)
IniWrite("C:\Temp\sehhilfe.ini", "Zoom", "ZoomFactor", $ZoomFactor)
EndIf
GUICtrlSetOnEvent($Button1, "aendern")
GUICtrlSetOnEvent($Button2, "endmain")
GUICtrlSetOnEvent($Button3, "zuruecksetzen")
GUISetOnEvent($GUI_EVENT_CLOSE, "endmain")
While 1
Sleep(50)
WEnd
Func zuruecksetzen()
[/autoit] [autoit][/autoit] [autoit]If $Checkbox1 And BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState ($Checkbox1, $GUI_UNCHECKED)
EndIf
$Colors = IniRead("C:\Temp\sehhilfe.ini", "Settings", "Always Use My Colors", "")
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Colors", "REG_SZ", $Colors)
If $Checkbox2 And BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState ($Checkbox2, $GUI_UNCHECKED)
EndIf
$Size = IniRead("C:\Temp\sehhilfe.ini", "Settings", "Always Use My Font Size", "")
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Size", "REG_SZ", $Size)
If $Checkbox3 And BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState ($Checkbox3, $GUI_UNCHECKED)
EndIf
$Face = IniRead("C:\Temp\sehhilfe.ini", "Settings", "Always Use My Font Face", "")
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Face", "REG_SZ", $Face)
If $Checkbox4 And BitAND(GUICtrlRead($Checkbox4), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState ($Checkbox4, $GUI_UNCHECKED)
EndIf
$FullScreen = IniRead("C:\Temp\sehhilfe.ini", "Main", "FullScreen", "")
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" ,"FullScreen", "REG_SZ", $FullScreen)
If $Checkbox5 And BitAND(GUICtrlRead($Checkbox5), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState ($Checkbox5, $GUI_UNCHECKED)
EndIf
$EnableOnStartup = IniRead("C:\Temp\sehhilfe.ini", "CaretBrowsing", "EnableOnStartup", "")
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\CaretBrowsing" ,"EnableOnStartup", "REG_DWORD", $EnableOnStartup)
If $Checkbox6 And BitAND(GUICtrlRead($Checkbox6), $GUI_CHECKED) = $GUI_CHECKED Then
GUICtrlSetState ($Checkbox6, $GUI_UNCHECKED)
EndIf
$ZoomFactor = IniRead("C:\Temp\sehhilfe.ini", "Zoom", "ZoomFactor", "")
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $ZoomFactor)
$PID = ProcessExists("magnify.exe")
If $PID Then ProcessClose($PID)
EndFunc;==>Zuruecksetzen
Func aendern()
If $Checkbox1 And BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
$wert = 1
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Colors", "REG_SZ", $wert)
Else
$wert = 0
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Colors", "REG_SZ", $wert)
EndIf
If $Checkbox2 And BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
$wert = 1
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Size", "REG_SZ", $wert)
Else
$wert = 0
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Size", "REG_SZ", $wert)
EndIf
If $Checkbox3 And BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
ShellExecute("magnify.exe")
$wert = 1
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\ScreenMagnifier" ,"Invert", "REG_DWORD", $wert)
Else
$wert = 0
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\ScreenMagnifier" ,"Invert", "REG_DWORD", $wert)
EndIf
If $Checkbox4 And BitAND(GUICtrlRead($Checkbox4), $GUI_CHECKED) = $GUI_CHECKED Then
$wert = 1
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Face", "REG_SZ", $wert)
Else
$wert = 0
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Face", "REG_SZ", $wert)
EndIf
If $Checkbox5 And BitAND(GUICtrlRead($Checkbox5), $GUI_CHECKED) = $GUI_CHECKED Then
$wert = "yes"
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" ,"FullScreen", "REG_SZ", $wert)
Else
$wert = "no"
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" ,"FullScreen", "REG_SZ", $wert)
EndIf
If $Checkbox6 And BitAND(GUICtrlRead($Checkbox6), $GUI_CHECKED) = $GUI_CHECKED Then
$wert = 1
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\CaretBrowsing" ,"EnableOnStartup", "REG_DWORD", $wert)
Else
$wert = 0
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\CaretBrowsing" ,"EnableOnStartup", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "125%" Then
$wert = 125000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "150%" Then
$wert = 150000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "175%" Then
$wert = 175000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "200%" Then
$wert = 200000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "225%" Then
$wert = 225000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "250%" Then
$wert = 250000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "275%" Then
$wert = 275000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "300%" Then
$wert = 300000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "225%" Then
$wert = 325000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "350%" Then
$wert = 350000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "375%" Then
$wert = 375000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "400%" Then
$wert = 400000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
If (GUICtrlRead($Combo1)) = "Zoom" Then
$wert = 100000
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $wert)
EndIf
$seite = GUICtrlRead($www)
ShellExecute("iexplore", $seite)
EndFunc;==>aendern
Func endmain()
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Colors", "REG_SZ", $Colors)
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Size", "REG_SZ", $Size)
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Settings" ,"Always Use My Font Face", "REG_SZ", $Face)
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main" ,"FullScreen", "REG_SZ", $FullScreen)
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\CaretBrowsing" ,"EnableOnStartup", "REG_DWORD", $EnableOnStartup)
RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Zoom" ,"ZoomFactor", "REG_DWORD", $ZoomFactor)
$PID = ProcessExists("magnify.exe")
If $PID Then ProcessClose($PID)
FileDelete("C:\Temp\sehhilfe.ini")
Exit
EndFunc;==>endmain
Edit: Habe es mal so umgebaut das es sich die Anfangswerte merkt und diese beim Beenden wieder reinschreibt.
mfg
oh-ha
Geht dank deiner Hilfe 
Nur wenn einer mal selbiges sucht. Habe es so angepasst das es mit den Klammern und Anführungszeichen passt.
[autoit]
Global $a_Farben[4][2] = [["bkada", "0x99FF00"], ["sinker", "0x4876FF"], ["Blubstar", "0xFFFF66"], ["name2", "0xFFFF00"]]
Global $s_FileName = "Test.txt"
Global $s_File = FileRead($s_FileName) ; Datei auslesen
For $i = 0 To UBound($a_Farben) - 1
$s_File = StringRegExpReplace($s_File, '<span style="color: #([[:xdigit:]]{3})">' & $a_Farben[$i][0] & '</span>', '[color=' & $a_Farben[$i][1] & ']' & $a_Farben[$i][0] & '[/color]</span>')
$between = _StringBetween($s_File, '<span style="color: #([[:xdigit:]]{3})">', ".....");zeigt es nicht an wenn ich das nicht lösche
Next
Global $h_File = FileOpen($s_FileName, 2) ; Öffne Datei zum schreiben und lösche alten Inhalt
FileWrite($h_File, $s_File)
FileClose($h_File)
mfg
oh-ha
Danke dir,
werde es mal probieren.
Das mit den Klammern und Anführungszeichen bekomme ich schon hin, wußte halt nur nicht wie ich es umsetzen sollte.
Denke mal das der Ansatz von dir schon in die richtige Richtung geht.
mfg
oh-ha
Stelle mir das so vor das man die Namen der Admins, mods und Vips in eine Liste schreibt mit dem Farbcode
der dann verwendet werden soll. Bekomme nur keine Schleife hin die mir die Onlineuser mit der Liste vergleicht.
und wenn ein treffer das ist den Text ändert.
Liste.ini
[bkada]
{color=0x4876FF]sinker[/color]
[Blubstar]
{color=0xFFFF66]Blubstar[/color]
[name2]
{color=0xFFFF00]name2[/color]
mfg
oh-ha
loooool bin Farbenblind und habe so meine Schwierigkeiten die richtige rauszusuchen.
Ist kein Witz.
Ist aber im Prinzip auch egal, man soll nur sehen das halt ein Mod oder Admin anwesend ist.
Bereichsmods sind bei uns hellblau und Globale halt dunkel blau. Soll sich nur unterscheiden mehr nicht.
Versuche mich an einem Tool das mir Anzeigt was im Forum so los ist.
Zum einen soll es mir die neuesten Beiträge anzeigen was schon mal geht
Dann die "wer ist Online Liste" was noch nicht geht wegen der Farben.
Dann soll es mir noch Anzeigen was in der Shoutbox los ist was gerade in Arbeit ist.
mfg
oh-ha
Hmmm keiner eine Idee ?
Wieder mal schlecht beschrieben ?
Oder ist es was verbotenes den Quelltext eines Forums auszulesen ?
mfg
oh-ha
Halo,
möchte ganz gerne Werte in einer *.txt Datei ändern.
Das geht auch so weit zumindest mit einem Wert nur muss das Suchmuster mehrere Werte erfassen und dann entsprechend ändern.
Möchte nicht für alle Farbcodes immer wieder das selbe Suchmuster Schreiben.
Suchcode mit nur einen Namen:
$filename = (@ScriptDir & "\liste.html")
$find = "bkada"
$replace ="[color=0x99FF00]bkada[/color]"
$retval = _ReplaceStringInFile($filename,$find,$replace)
$hFile = FileOpen(@ScriptDir & "\Farbe.txt", 2)
FileWrite($hFile, $replace)
FileClose($hFile)
177 Benutzer (Dienstag, 1. Februar 2011, 19:50)</p>
<p class="smallFont">
<a href="index.php?page=User&userID=19454&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">forgett</a>, <a href="index.php?page=User&userID=3286&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">blumiger</a>, <a href="index.php?page=User&userID=15864&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">Diesel</a>, <a href="index.php?page=User&userID=19527&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">K007</a>, <a href="index.php?page=User&userID=19529&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">Destro</a>, <a href="index.php?page=User&userID=500&s=1d032cb35b08a565b8ebab028cd93c2004a5c940"><span style="color: #09f">nullspammer</span></a>, <a href="index.php?page=User&userID=8721&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">klark13</a>, <a href="index.php?page=User&userID=19519&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">morester</a>, <a href="index.php?page=User&userID=14183&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">loser</a>, <a href="index.php?page=User&userID=19525&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">birkenauer</a>, <a href="index.php?page=User&userID=5&s=1d032cb35b08a565b8ebab028cd93c2004a5c940"><span style="color: #fd4">nassim</span></a>, <a href="index.php?page=User&userID=5258&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">murmel64</a>, <a href="index.php?page=User&userID=17633&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">009</a>, <a href="index.php?page=User&userID=14555&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">jostino</a>, <a href="index.php?page=User&userID=15571&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">markantos</a>, <a href="index.php?page=User&userID=3069&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">silan</a>, <a href="index.php?page=User&userID=19526&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">xoros</a>, <a href="index.php?page=User&userID=7342&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">frankk</a>, <a href="index.php?page=User&userID=12965&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">klastiker</a>, <a href="index.php?page=User&userID=2&s=1d032cb35b08a565b8ebab028cd93c2004a5c940"><strong><span style="color: #0f0">bkada</span></strong></a>, <a href="index.php?page=User&userID=566&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">uli641</a>, <a href="index.php?page=User&userID=15611&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">jang</a>, <a href="index.php?page=User&userID=33&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">Lilo34</a>, <a href="index.php?page=User&userID=691&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">kaster</a>, <a href="index.php?page=User&userID=6008&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">mongo</a>, <a href="index.php?page=User&userID=19520&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">richter1</a>, <a href="index.php?page=User&userID=1788&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">noop</a>, <a href="index.php?page=User&userID=9282&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">planer</a>, <a href="index.php?page=User&userID=11861&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">justusF</a>, <a href="index.php?page=User&userID=428&s=1d032cb35b08a565b8ebab028cd93c2004a5c940"><span style="color: #09f">sinker</span></a>, <a href="index.php?page=User&userID=19528&s=1d032cb35b08a565b8ebab028cd93c2004a5c940">tropfer</a> </p>
</div>
</div>
In dieser Text Datei suche ich nun bestimmte Namen die auch eine Farbe haben. Diese Farbwerte möchte ich dann ändern in bb code.
Das diese Zeile
page=User&userID=428&s=1d032cb35b08a565b8ebab028cd93c2004a5c940"><span style="color: #09f">sinker</span></a>, <a href="index.php?
in diese geändert wird
page=User&userID=428&s=1d032cb35b08a565b8ebab028cd93c2004a5c940"><span style="color: {color=0x4876FF]sinker[/color]</span></a>, <a href="index.php?
oder aber auch nur in
{color=0x4876FF]sinker[/color]
wird dann beides später in der Gui richtig angezeigt.
Wie bekomme ich das ganze als Schleife hin mit mehr als nur einen Suchbegriff?
Hoffe mal das ich es nicht wieder zu umständlich beschrieben habe.
mfg
oh-ha
Erst einmal Danke für die Vorschläge von euch.
@progandy
Da bin ich wohl nicht so weit mit Autoit das ich deine Funktion auch nutzen kann.
Hatte da so einiges probiert aber leider ohne Erfolg, keine Ahnung wie ich da den Aufruf machen soll.
Habe dann einfach, bestärkt durch Großvater, die Daten als normale behandelt.
Bei den Versuch mal einen Chunk zu trennen, wo ich meinte das es wohl einfacher ist als etwas zu tauschen kommen
immer 128 bit mehr bei raus. Diese werden als 0Bite (FF) an die erstellte Datei angehängt.
Habe es mal so probiert:
$message = "Gehen nur(*.abs Dateien )"
$var = FileOpenDialog($message, @ScriptDir & "\", "Images (*.abs;*.txt)", 1 + 4 )
If @error Then
MsgBox(4096,"","Ups!" & @CRLF & "nichts Ausgewählt")
Else
$File = FileOpen($var,16)
$Replace = BinaryToString($File)
$BinFile = FileRead($File)
$teilen = StringSplit($BinFile, "EF1010AC",1)
$erster = FileOpen("erster.abs",16+2)
FileWrite($erster, $teilen[1])
FileClose($erster)
FileClose($File)
EndIf
Und hier mal eine Datei:
Klicke mich
Ups genau 0,06 zu groß deswegen ul.to
Wie kann es sein das es immer genau 128bit sind ?
Habe aber auch noch nicht geschafft einen anderen Chunk zu trennen. Da bin ich noch am Testen.
mfg
oh-ha
Ersteinmal Danke das ihr da weitergemacht habt wo ich schon aufgegeben hatte.
Melde mich erst jetzt da ich versucht habe das über eine batch zu machen mit hexciting.
Hätte man ja auch über autoit dann steuern können.
Wäre mir natürlich lieber das alles über autoit zu machen, wenn es denn geht.
@ progandy,
werde das mal testen und berichten. Wird aber etwas dauern da ich über die woche weg bin und nicht weiss ob es da internet gibt.
Edit: autoBert
stelle doch mal eine Testdatei und auch Infos über das Dateiformat bereit, vielleicht schaffst ja doch jemand,
Ist eine Firmware für einen Receiver.
Per hand kann ich da so einiges ändern. Nur das sollte besser nicht öffentlich behandelt werden.
Könnten sich so einige den receiver schrotten.
Habe ein kleines forum und stelle da dann die geänderten firms zur verfügung.
Wollte mir nur die arbeit etwas erleichtern und nicht immer von hand im code rumstochern.
Hmm der schuß ging wohl etwas nach hinten los. 
mfg
oh-ha
Zitat von autoBertnatürlich ist das machbar, ich bezweifle aber dass du danach noch eine gültige Datei hast
Das du aber auch ( fast ) immer recht behalten mußt.
Habe einiges probiert, _StringBetween, StringInStr, StringSplit aber kam meist nur müll dabei raus.
Entweder bin ich zu blöd dafür oder es geht halt nicht mit autoit.
Muss ich mich wohl auch weiterhin mit CodeFusion begnügen und per hand die dateien ändern. 
mfg
oh-ha
Hallo name22,
danke für deinen anstoß, war wohl das was ich gebraucht habe.
Geht zwar derzeitig noch nicht mit StringInStr, StringReplace usw aber ich probiere noch.
mfg
oh-ha
Hi autoBert,
naja von Hand geht das ja alles.
Wollte halt nur mal Wissen ob und wenn wie man das mit Autoit machen könnte.
mfg
oh-ha
Ist eine *.abs Datei
Zumindest meckert Autoit nicht wenn ich sie einlese.
Moin moin,
Kann man mit Autoit Werte in einer Datei suchen und auch ändern, aber das ganze dann in einer Hex Datei ?
In dieser Form habe ich es mit WinHex:
[Blockierte Grafik: http://geiler-bildhost.de/upload/1299846360.jpg]
Das blau makierte möchte ich suchen und 64 Byte (FF) darunter Löschen.
Das ganze soll dann auch wieder gespeichert werden.
Habe noch nicht mal im Ansatz eine Ahnung wie man derartiges machen könnte, wenn es denn geht.
mfg
oh ha
Nettes Tool
Bist du da noch dran am Arbeiten oder hast du es eingestellt?
Wäre schön wenn man es auch noch beenden könnte.
mfg
oh-ha
Moin moin,
hatte mal das selbe Problem gehabt. Schaue mal hier nach. Post 8 von m-obi
Klicke mich
mfg
oh-ha
LOL
Hätte ich es mal so weit gebracht wäre ich stolz drauf.
Ist wohl immer eine Sache des Betrachters.
mfg
oh-ha
Die Id´s der Checkboxen nach dem generieren der Checkboxen auslesen und dann halt in der *.ini abspeichern.
Aber da die ID´s immer anders waren nach einen Neustart bin ich da gescheitert.
mfg
oh-ha
Oh man sorry habe ich in der Suche nicht gefunden.
Bin da jetzt schon ein paar Tage dran am basteln und immer wieder die Suche benutzt aber nichts passendes gefunden.
War aber wohl auch auf den falschen Dampfer da ich mehr versucht hatte das über die ID´s der Checkboxen zu machen, was wohl nicht möglich ist.
Werde mir auch deinen Ansatz mal anschauen um mein wissen ein wenig zu erweitern.
Danke euch für die wirklich einmalige Hilfe die man hier bei autoit.de bekommt.
mfg
oh-ha
