Beiträge von Professor Bernd

Falls dir langweilig ist und du eine Ini mit Zeichen in allen möglichen Sprachen angehen willst, sind im Anhang Beispieldateien. Wegen der Größe der Datei habe ich die Ausgabe in eine Datei gespeichert (in der 2.au3, Zeile 4: FileWrite("Ergebnis.ini", $sZusammen)).

In der Ist.ini gibt es 4 Änderungen zur Soll.ini. Falls du WinMerge oder ähnliches hast, kannst du sie dir leicht anzeigen lassen. Ansonsten kannst du nach "Hallo Welt!" suchen, das ich an den 4 Stellen eingefügt habe.

Edit: AspirinJunkie Bitte nur als Zusatzarbeit verstehen, es wird im konkreten Fall nicht wirklich benötigt (siehe vorheriges Posting).

Super Arbeit!

Lediglich bei asiatischen, arabischen, bulgarischen, ... Zeichen macht der Code nicht mit. Woran es lag, konnte ich nicht rausfinden, ich habe eine Ini mit Sprachen geladen und die Ausführung blieb gleich stecken.

Aber das ist nicht schlimm, ich habe nicht vor, Language.ini's auf diese Art upzudaten. Im Moment sind nur Settings beabsichtigt, das reicht.

Vielen Dank für deine Mühe! ... Jetzt muss ich nur noch sehen, wie ich das auf VBScript umsetzen kann.

Zitat von Musashi

Das 32 KB Limit scheint, zumindest ab Win7, also nicht mehr zu gelten.

Dann wird sich das 32 KB Limit nur auf IniReadSection() beziehen. Und das wäre ja wirklich kein Problem. Wenn man davon ausgeht, dass die PSPad.ini bei 32 KB Gesamtgröße aus insgesammt etwa 1.500 Zeilen besteht und man das für eine einzelne Sektion benutzen könnte, ... ich kann da kein Problem sehen, die ganze PSPad.ini würde in 1 Sektion passen. Und man kann doch locker mehr Sektionen erstellen, usw.

Danke fürs Testen!

Zitat von AspirinJunkie

Hast du die Ist.ini gespeichert bzw. ist es die richtige?

Es ist nicht die gepostete, weil das Kopieren aus der Webseite die Formatierung ändert. Ich habe eine neue Ist.ini erstellt, das ging schneller. Im Anhang sine alle 3 Dateien, inklusive der Ergebnis.ini , die dein Code erzeugt hat.

Beeindruckend!

Ein kleiner Fehler ist noch drin, siehe Screenshot.

In "C:\Program Files\Open-Shell\" habe ich eine Ini gefunden mit fast 300 KB. Das 32 KB Limit scheint nicht mehr zu existieren.

BugFix Kann es sein, dass das Limit nur für IniReadSection() gilt, so wie AspirinJunkie das inPosting #5 geschrieben hat?

Zitat von BugFix

Aus den 16 Bit Windows Zeiten. Mit Einführung der Registry wurden die Ini Dateien durch MS im System selbst nicht mehr verwendet.

Also kann das Limit in 64 Bit Windows Zeiten durchaus weggefallen sein? Aber selbst wenn das 32KB File Size Limit noch bestehen sollte, wäre das kein Problem. Ich denke nicht, dass Pau3 soviele Einträge erhält, dass das Limit überschritten wird. Und falls doch, gibts eine zweite Ini-Datei.

Zitat von AspirinJunkie

Also ist es nicht das gewünschte Resultat.
Bitte also noch eine dazugehörige Beispieldatei.

Ach bitte, wozu soll das den gut sein? Ist der Sinn nicht klar?

Aber dir zuliebe poste ich oben noch eine "gewünschtes Resultat"-Ini.

Zitat von BugFix

Du brauchst die User Datei niemals bearbeiten, das macht ausschließlich der Anwender.

Hmm, ... sollte es mal irgendwann einen Settings-Dialog geben, wäre das gar nicht so schlecht. Im Settings-Dialog kann man die Infos unterbringen, die ich derzeit als Kommentare in die Ini schreibe.

Zitat von BugFix

32k File Size Limit.

Witzig, ich habe gerade nachgesehen, die PSPad.ini hat 32KB. Woher kommt das Limit? Ist das noch akutell?

Zitat von AspirinJunkie

Die Soll-Ini ist - wie du sagst - dein gewünschtes Resultat und diese hast du ja bereits in deinem Skript.
Also muss du die Ist-Ini nur mit dieser überschreiben.

Nicht ganz. Wie geschrieben sollen die Werte der Ist-Ini erhalten bleiben.

Zitat von BugFix

Du solltest evtl. das Konzept überdenken.

Deshalb frage ich ja hier.

Zitat von BugFix

Ich finde die von SciTE gewählte Variante mit Global und User Properties sehr gut.

Das hatte ich vor einiger Zeit auch schonmal überlegt. Aber bisher konnte ich das mit meinem Konzept nicht unter einen Hut bringen. Zum Beispiel soll Pau3 einen Settings-Dialog bekommen. Wo sollte der dann hinspeichern? Wahrscheinlich in die User Properties, dann bin ich soweit wie jetzt, oder? Das werde ich nochmal überdenken, ansich ist die Idee nicht schlech, Global... und User... zu trennen.

Zitat von Professor Bernd

Zum anderen soll eine vorgesehene Reihenfolge in der Ini eingehalten werden.

Zitat von BugFix

Was ist der Nutzen davon?

Ordnung. Schlüssel können aphabetisch sortiert werden und somit können zusammengehörende Schlüssel beisammen stehen und in einer sinnvollen Reihenfolge, wie z.B. im Beispiel oben

; Close the LogWin automatically if no errors occur ...

AutoCloseIfNoError=1

; ... but not if debug messages occur.

AutoCloseButNotIfDbgMsg=1

BugFix Du postest schneller, als ich antworten kann. Ich schicke hier schonmal eine Teilantwort.

Zitat von BugFix

Verabschiede dich von der Ini, da geht ins Auge (Limit).

Welches Limit?

Beispiele im Post #4 ergänzt.

Zitat von AspirinJunkie

Ich meine ini - und zwar alle drei: "Ist"-Ini, "Soll"-Ini und "gewünschtes Resultat"-Ini

Ein Beispiel für eine "Soll"-Ini habe ich oben gepostet, das auch die "gewünschte Resultat"-Ini. Eine "Ist"-Ini kann ich auch posten, ist einfach eine "Soll"-Ini mit Durcheinander und fehlenden/gelöschten Schlüsseln.

Hab deine Info im ersten Post eingearbeitet.

Zitat von AspirinJunkie

Ansonsten tun Beispieldateien gut.

Meinst du Ini- oder Script-Dateien? Ein Script gibts noch nicht. Wollte erst Ideen sammeln.

Zitat von AspirinJunkie

Mit Kommentaren kommt IniRead und Konsorten doch klar.

Das wusste ich nicht, danke für die Info! - Ich gehe aber davon aus, dass IniRead und Konsorten für jede Abfrage die Ini öffnen und schließen, oder? Bei über 1.000 Einträgen wäre das suboptimal.

Es geht darum, eine Ini-Datei zu aktualisieren, ohne deren Einstellungen zu verlieren.

In Pau3 gibt es eine Main-Ini, mit der Einstellungen verwaltet werden. Wenn nun ein User ein Update über seine vorhandene Version kopiert, will er seine Einstellungen natürlich nicht verlieren. In einer reinen Ini wäre das recht einfach, indem man nur die Werte auf Vorhandensein und Gültigkeit prüfen und ergänzen würde.

Zum einen handelt es sich hierbei aber um eine Ini mit gemischtem Inhalt, nämlich mit Kommentaren, die Infos zu Einstellungen geben. Z.B. zum Schlüssel FarbSchema könnte es einen Kommentar FarbSchema: hell, dunkel, auto geben.

- Edit: Nach Info von AspirinJunkie sollten Kommentare keine Probleme machen.

Zum anderen soll eine vorgesehene Reihenfolge in der Ini eingehalten werden.

Es gibt also eine "Soll"-Ini und eine "Ist"-Ini.

Nun sollen die Werte der Schlüssel in der Ist-Ini aktualisiert werden, wobei vorhandene gültige Werte des Users erhalten bleiben. Neue Schlüssel und Kommentare sollen hinzugefügt, gelösche Kommentare und die gewünschte Reihenfolge wieder hergestellt werden. Ich denke, es ist klar wie's gemeint ist.

Der Code wird beim Starten von PSPad geladen und sollte leicht geschwindigkeitsoptimiert sein, das heißt, es kommt zwar nicht auf Millisekunden an, aber wenn der Code flott ist, ist das gut für die Startgeschwindigkeit von PSPad.

Meine Überlegung schwankt zwischen Arrays und Dictionarys. Auf jeden Fall könnte ich es mir so vorstellen, dass z.B. beide Inis zeilenweise (StringSplit()) in Arrays geladen und verglichen werden.

• Das Soll-Array wird von Anfang bis Ende durchlaufen und jede einzelne Zeile mit allen Zeilen des Ist-Arrays verglichen.
• Handelt es sich bei der Soll-Zeile um einen Kommentar, wird er übersprungen, denn die Kommentare werden am Schluss bei Schreiben an die richtige Stelle gesetzt.
• Handelt es sich bei der Soll-Zeile um einen Schlüssel, werden alle Zeilen des Ist-Arrays durchlaufen, bis der Schlüssel gefunden ist. Ist der Schlüssel im Ist-Array NICHT vorhanden, wird die Soll-Zeile einfach übernommen. Ist der Schlüssel im Ist-Array vorhanden, wird der Wert auf Gültigkeit geprüft und entweder übernommen (wenn gültig) oder ersetzt (wenn UNgültig).
• Evtl. als Geschwindigkeitsoptimierung die Zeilen aus dem Ist-Array löschen, die schon verarbeitet wurden. Das kann aber in die Hose gehen, denn wahrscheinlich ist das ReDim des Ist-Arrays langsamer, als wenn man nicht löscht.
• Der Inhalt der Ist-Ini wird gelöscht und das Soll-Array in die Ist-Ini geschrieben.

Die Main-Ini eines ausgewachsenen Programms, wie z.B. PSPad, kann leicht über 1.500 Zeilen beinhalten. Deshalb würde ich mich freuen, über Ideen und Verbesserungsvorschläge.

Zitat von UPIA

Global $BGimage = @ScriptDir & "\images\background.png"

Global $BGpic = GUICtrlCreatePic($BGimage, 0, 0, 1366, 748)

Liebe/r UPIA , leider muss ich hier mal den Oberlehrer geben:

Funktion GUICtrlCreatePic...Parameter

Zitat von water

Für die magic numbers bestehen noch keine Konstanten - ich habe sie daher belassen, aber vor den Funktionsaufruf entsprechende Kommentare eingefügt

Finde ich ok und die Kommentare klasse! Zuerst dachte ich, man könnte zur besseren Veranschaulichung eigene, sprechende Konstanten benutzen, wie $eCOLORREF. Aber dann dachte ich, vielleicht ist das zuviel des Guten und die (magischen) Zahlen bringen mehr Übersicht.

Beim Programmieren habe ich einfach die Erfahrung gemacht, dass man im ersten Moment versucht ist zu denken: "Was solls? Ist doch alles klar!" Aber nach drei, vier Monaten ist einem nicht mehr so klar, was man damals gedacht hat. Dann freut man sich, wenn man Kommentare dazu geschrieben hat. (Und pssst! Nur unter uns: In meinem Pau3 Projekt, das mittlerweile für mich recht große Ausmaße angenommen hat und über mehrere Programmiersprachen geht, bin ich über Kommentare richtig oft froh!)

Zitat von water

Die von Dir vorgeschlagene Formatierung habe ich übernommen

Die ist scheinbar zwischendurch wieder verloren gegangen.

Da im Edit eine Monospace-Font benutzt wird, sollte man das zum Formatieren ausnutzen und die Werte im Edit schön untereinander ausrichten. Im Code unten habe ich das wieder hergestellt. Ich würde mich freuen, wenn es dir gefällt.

Die meisten anderen Änderungsvorschläge sind Formatierungen. Den Code habe ich mit reichlich Kommentaren versehen, so sollte es verständlich sein. Meine Frage zu Param 2 soll weder Kritik, noch Aufforderung zur Änderung sein, sie ist rein informativer Natur.

#include <GUIConstantsEx.au3>
#include <Misc.au3>
#include <WindowsConstants.au3>

Example()

; COLORREF: This value specifies an RGB color as 0x00BBGGRR (blue, green, red). Example: Red = 0x000000FF
;             See: https://docs.microsoft.com/en-us/windows/win32/gdi/colorref  <== das hier einrücken
; RGB:      This value specifies a color as 0xRRGGBB (red, green, blue)         <== das hier ausrücken
; BGR:      This value specifies a color as 0xBBGGRR (blue, green, red)
Func Example()
    Local $hGUI, $idCOLORREF, $idEdit, $idSELECT, $idCLEAR, $iChoose, $sDefaultColor = 0xF0F0F0

    $hGUI = GUICreate("_ChooseColor() Example", 570, 300)                             ; <== GUI und Edit je 20 Pixel breiter gemacht, damit alles
    $idEdit = GUICtrlCreateEdit("", 2, 55, 566, 200, BitOR($WS_VSCROLL, $WS_HSCROLL)) ;     reinpasst, falls dir meine Formatierung weiter unten zusagt.
    GUICtrlSetFont($idEdit, 10, 400, 0, "Courier New")                                ; <== Alternativ könnte man FontSize 9 verwenden.
    $idSELECT = GUICtrlCreateButton("Select color", 70, 10, 80, 40)
    $idCLEAR = GUICtrlCreateButton("Clear output", 160, 10, 80, 40)
    $idEXIT = GUICtrlCreateButton("Exit", 360, 10, 80, 40)
    GUISetState(@SW_SHOW)

    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE, $idEXIT
                ExitLoop
            Case $idCLEAR
                GUICtrlSetData($idEdit, "")
                GUISetBkColor($sDefaultColor, $hGUI)
            Case $idSELECT
                ; Param 1: Return the selected color as RGB (2)                 <== Den Abschnitt finde ich generell super, Erklärungen finde ich immer gut.
                ; Param 2: Set the default color to red (255)                   <== Bitte nur als Frage verstehen, nicht als Aufforderung oder Kritik:
                ; Param 3: Interpret Param 2 as COLORREF rgbcolor (0)                 Warum nimmst du hier eine Dezimal-Zahl, statt eine Hex-Zahl?
                $iChoose = _ChooseColor(2, 255, 0, $hGUI)                           ; Hex würde sich bei RefType 0 doch anbieten, oder?
                If $iChoose <> -1 Then _ShowChoice($hGUI, $idEdit, $iChoose)
        EndSwitch
    WEnd
EndFunc   ;==>Example

Func _ShowChoice($hGUI, $idEdit, $iChoose)
    Local $sMessage = "", $sRGB, $sBGR, $sCOLORREF
    $sRGB = Hex($iChoose, 6)
    $sBGR = StringMid($sRGB, 5, 2) & StringMid($sRGB, 3, 2) & StringMid($sRGB, 1, 2)
    $sCOLORREF = "0x00" & $sBGR
    GUISetBkColor($iChoose, $hGUI)
    ; Hier würde ich zur besseren Veranschaulichung konsequent beim jeweiligen Format bleiben, also COLORREF bei COLORREF, BGR bei BGR, ...
;     $sMessage = "COLORREF color of your choice: " & $sCOLORREF & ", decimal: " & Dec($sBGR) & @CRLF & _
    $sMessage = "COLORREF color of your choice - hex: " & $sCOLORREF & ", decimal: " & Dec(Hex($sCOLORREF, 8)) & @CRLF & _
            "BGR      color of your choice - hex: 0x" & $sBGR & ",   decimal: " & Dec($sBGR) & @CRLF & _
            "RGB      color of your choice - hex: 0x" & $sRGB & ",   decimal: " & Dec($sRGB) & @CRLF
    ; Formatierung von $sMessage: Da im Edit eine Monospace-Font benutzt wird, sollte man das zum Formatieren ausnutzen. Bei COLORREF fehlt
    ; das "hex", "hex überall kleinschreiben (EN-like) und die Einrückungen ausrichten, sodass die Werte übersichtlich untereinander stehen.
    GUICtrlSetData($idEdit, $sMessage, 1)
EndFunc   ;==>_ShowChoice

Vielen Dank für deine Mühe!

Heißt das, dass dir mein Beispiel nicht gefällt? Und dass es nicht als Beispiel 2 aufgenommen wird?

Zu deinem Beispiel: Das finde ich um einiges besser, als das vorhandene!

Richtig super finde ich die Kurz-Info zu COLORREF, BGR und RGB am Anfang des Codes, vorallem den Link zur MS-Docs-Seite! Ebenfalls gut gefällt mir die _ShowChoice UDF. Sie ist einfacher gestaltet und kommt ohne den Param $Type aus, der für Verwirrung gesorgt hat.

Verbesserungsvorschläge:

• Vielleicht die magic numbers in _ChooseColor(2, 255, 0, $hGUI) durch sprechende Konstanten ersetzen und die Farbvorwahl als Hex.
• $idMemo durch $idEdit ersetzen. Das ist aber eigentlich egal.
• Formatierung von $sMessage überarbeiten, z.B.:

    $sMessage = "COLORREF color of your choice - hex: " & $sCOLORREF & ", dec: " & Dec(Hex($sCOLORREF, 8)) & @CRLF & _
        "BGR      color of your choice - hex: 0x" & $sBGR & ",   dec: " & Dec($sBGR) & @CRLF & _
        "RGB      color of your choice - hex: 0x" & $sRGB & ",   dec: " & Dec($sRGB) & @CRLF

Was haltet ihr davon? Bist du noch bei uns, Tweaky ?