Hallo alpines,

DANKE für den Tipp, es funktioniert einwandfrei damit.

MfG:

BigRox

Hallo,

mit "Send("{VOLUME_MUTE}") " kann man ja den Sound von Windows 10 ein- oder ausschalten.

Gibt es auch eine Möglichkeit den momentanen Status des Sounds festzustellen?

Windows 10 zeigt ja da so ein kleines Fenster mit einem Symbol dafür an, also müsste eigentlich auch irgendwo in den Tiefen von Windows stehen, ob das Kreutz im Fenster angezeigt werden soll oder nicht.

Mit dem AutoIt Fenster-Info-Tool kommt man anscheinend nicht an die benötigten Infos ran.

Mfg:

BigRox

Hallo,

Danke für die Hilfe.

Zitat von AspirinJunkie

Geht schon:

AutoIt

$sTextNeu = StringRegExpReplace($sText, ',(?=[^\[]+\])', '-')

Hab ich mir doch gedacht, dass so etwas auch mit RegEx geht.

U.a. für so etwas gibt es die Sache doch.

MfG:

BigRox

Hallo,

gut lesbaren aber möglichst "elegant" geschrieben Code liebe ich auch und meine persönliche Note sind:

Eindeutige Variablennamen, eine klare Aufteilung und massenweise Kommentare.

Gerade das mit den Kommentaren macht zwar viel Arbeit (dadurch wird das Script bei mir mehr als doppelt solang), aber es bringt auch einiges u.a. für spätere Scriptänderungen.

Gerade bei RegExen schreibe ich immer einen Kommentar dazu.

Ich versuche auch möglichst unnötige Variablen zu vermeiden, auch deshalb sieht das letzte Script von Musashi ganz interessant aus, da man damit u.a. auch einige Variablen sparen kann.

MfG:

BigRox

Hallo,

hier mal ein auf die schnelle zusammengebasteltes Script:

Global $sText, $iLV, $iStartposition, $iEndposition, $sString, $iCount

$sText = 'Das ist, aber schön, [18, "D:", 34, "X:"][20, 50][3][5, 22][500][60, "D"], Hier ist der, String, zu Ende.'

Do
    $iLV = $iLV + 1
    $iStartposition = StringInStr($sText, "[", 0, $iLV)
    $iEndposition = StringInStr($sText, "]", 0, $iLV)
    If $iStartposition > 0 Then
        $iCount = $iEndposition - $iStartposition
        $sString = StringMid($sText, $iStartposition, $iCount)
        $sString = StringReplace($sString, ",", "-")
        $sText = StringReplace($sText, $iStartposition, $sString)
    EndIf
Until $iStartposition = 0

MsgBox(0, "Test", $sText)

Das Script macht genau das was ich will.

Der Text kann durch jeden anderen Text ersetzt werden, es geht nur um die Kommas die zwischen [ und ] stehen.

Die Kommas sollen ausgetauscht werden und alle Kommas die außerhalb der Zeichen [ und ] stehen,

sollen nicht ausgetauscht werden.

Nur kann man das nicht auch mit einem RegEx machen?

Ich könnte mir schon vorstellen, dass diese Sache mit RegEx und ohne viel Scripterei zu machen währe.

MfG:

BigRox

Hallo alpines,

das können irgendwelche Zeichen sein, nur die Kommas die sich in diesen Zeichen befinden, sollen nicht ersetzt werden.

Daher kann ich einfaches StingReplacen nicht verwenden.

Da währe mit _StringBetween() usw. wohl eher was zu machen.

Dann hätte ich ja den Teil zwischen [ und ] und dann könnte ich StringReplace verwenden.

Nur wie bekomme ich dann den bearbeiteten String wieder in den Originalstring.

MfG:

BigRox

Hallo,

ich habe da einen String:

"Beliebige, Zeichen, [26, "A:", "B:", "P:", "Q:", "R:], Weitere, Zeichen"

Jetzt möchte ich bei diesem String, alle Kommas zwischen [ und ] durch einen Bindestrich ersetzen.

Das ganze soll dann diesen String ergeben:

"Beliebige, Zeichen, [26- "A:"- "B:"- "P:"- "Q:"- "R:], Weitere, Zeichen"

Das müsste doch eigentlich mit RegEx (lock behind, lock ahead o.ä.) gehen.

MfG:

BigRox

Hallo Tweaky,

hier kommt wieder einer zum korrigieren.

Im Beispiel zu der "WinWaitActive"-Funktion, steht:

; Wartet 2 Skeunden um das Editorfenster darzustellen.

MfG:

BigRox

Hallo,

hier kommt der nächste.

Funktion: "_FileWriteToLine"

Da steht in der Parameterbeschreibung:

$bOverWrite [optional]
  
False - (Standard) Der Text an der festgelegten Zeile eingefügt und alle...Ich glaube, da fehlt ein "wird" hinter "Der Text"MfG:BigRox

Hallo Musashi,

in der Datei "SciTEGlobal.properties" steht folgendes:

In der Datei "SciTEUser.properties" stehen die folgenden Zeilen:

code.page=0

output.code.page=0

Ich verwende folgende SciTE-Version:

Version 4.1.0

Jun 27 2018

MfG:

BigRox

Hallo,

ich habe da mal eine Frage zu AutoIt3Wrapper

Als Direktive habe ich u.a. "#AutoIt3Wrapper_Res_Language=1031" in meinem Script stehen.

Aber sobald ich das Script mit "Ctrl + F7" in SciTE (also mit der Wrapper GUI) kompiliere, werden alle deutschen Umlaute durch andere Zeichen ersetzt.

Da sich dadurch auch Fensternamen usw. ändern, funktioniert das kompilierte Script (die erstellte exe) natürlich auch nicht mehr.

Z.B. Wird aus dem "Zurück" Text auf einem Button dann "Zurück" und der Button wird dann eben auch nicht mehr erkannt.

Wenn ich dagegen SciTE verlasse und das Script über das Kontextmenü von Windows kompiliere, so werden die Umlaute nicht ausgetauscht und daherfunktioniert die exe auch.

Anscheinend gibt es nur Müll, wenn die GUI irgendetwas ins Script schreibt (z,B. eine geänderte Direktive).

Also, Kompilieren mit GUI ergibt Müll, kompilieren ohne GUI funktioniert richtig.

Und mehrfaches kompilieren mit der GUI ergibt auch mehrfachen Müll, da der Wrapper dann die ersetzten Zeichen auch mehrfach ersetzt.

Kann man dem Wrapper das irgendwie "abgewöhnen" oder liegt das an irgendeiner Einstellung von SciTE?

MfG:

BigRox

Hallo Tweaky,

hier kommt der erste.

In "Makro Referenz - AutoIt-spezifisch"

steht im Abschnitt "@ScriptLineNumber"

... Funktioniert nubr in unkompilierten Skripten...

MfG:

BigRox

Hallo autoBert und Bitnugger,

vielen Dank für die Hilfe

Gerade das Beispiel von Bitnugger ist wegen den Erläuterungen im Script sehr interessant für mich.

Damit bekomme ich es auch hin.

MfG.

BigRox

Hallo,

ich habe da folgendes Problem und weiß nicht weiter.

Hier ein kleines Script ,das ich mal schnell zum testen geschrieben habe:

#include <GUIConstants.au3>

Local $hGUI, $iTab

$hGUI = GUICreate("", 200, 130, -1, -1)
$iTab = GUICtrlCreateTab(0, 0, 200, 130)

GUICtrlCreateTabItem("Tab 1")

$Btn_1 = GUICtrlCreateButton("Button 1", 50, 50, 100, 40)

GUICtrlCreateTabItem("Tab 2")

$Btn_2 = GUICtrlCreateButton("Button 2", 50, 40, 100, 40)

$Btn_3 = GUICtrlCreateButton("Button 3", 50, 90, 100, 40)

$Btn_4 = GUICtrlCreateButton("Button 4", 50, 140, 100, 40)

GUICtrlCreateTabItem("")

GUISetState(@SW_SHOW, $hGUI)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd

GUIDelete($hGUI)

Folgendes Problem habe ich:

Beim ersten Tab wird nur ein Button im Tab angezeigt, beim zweiten Tab aber drei.

Da ich aber die Länge der GUI nur für den ersten Tab (der mit einem Button) angegeben habe, können die drei Buttons im Tab 2 nicht alle angezeigt werden.

Oder ich gebe die Länge der GUI so an, dass die drei Buttons von Tab 2 alle angezeigt werden können, aber dann ist unter dem einen Button auf Tab 1 viel leerer Raum und das will ich nicht so haben.

Ein Lösung wäre also wenn sich die GUI abhängig vom momentan angezeigten Tab verlängern oder verkürzen würde.

Das einzige was mir dazu einfällt, währe wenn die GUI bei jedem Tabwechsel eine Nachricht mit dem Namen des momentan angezeigten Tabs erzeugen würde. Darauf könnte man ja mit z.B "WinMove" entsprechend reagieren.

Nur das scheint wohl etwas schwieriger zu sein. Jedenfalls fällt mir dazu keine Lösung ein.

Ich könnte mir aber vorstellen, dass schon mal einer hier im Forum dieses Problem hatte und eine Lösung dafür hat.

MfG:

BigRox

Hallo Tweaky,

ich habe diese Einstellungen jetzt auch bei mir mal eingestellt.

Und der Umbruch erfolgt bei mir immer noch mitten im Wort.

Die SciTE-Einstellung (font.monospace=font:Courier New,size:9) hat anscheinend keinerlei Einfluss auf die Hilfe.

Aber die Einstellung "mittel" ändert schon einiges, allerdings wird bei mir der Satz nur in der Einstellung "Sehr klein" ordentlich angezeigt.

Anscheinend liegt es an der horizontalen Größe des Hilfe-Fensters, wenn ich nämlich das Fenster schmaler mache, so wird der Satz auch wieder mitten im Wort umbrochen.

Probier mal bei dir aus, wie der Satz bei dir aussieht, wenn du das Hilfe-Fenster schmaler machst.

MfG:

BigRox

Hallo Tweaky,

ich vermute mal, dass es mit den Schrifteinstellungen von SciTE oder in der Hilfe zu tun hat.

Daher hier mal meine SciTE-Einstellungen dazu:

font.base=font:Courier New,size:12,$(font.override)

font.monospace=font:Consolas,size:12

proper.case=0

use.tabs=1

indent.size=4

indent.size.*.au3=4

tabsize=4

Die Schriftgröße in der Hilfe (Menü "Ansicht | Schriftarten") steht auf "Größer" (ich habe es halt lieber etwas größer, weil das einfach angenehmer zu lesen ist).

Oder kann man die Schriften der Hilfe noch wo anders einstellen?

MfG:

BigRox

Hallo,

und hier noch einer zum beheben.

Bei der Funktion "WinMove"

steht bei Parameter:

Da hat wohl einer etwas vertauscht.

Im englischen ist es aber richtig.

Bei dieser Funktion ist mir beim Beispiel noch eine Unschönheit aufgefallen.

Der Satz "; Ermittelt die Position..." wird bei mir mitten im Wort umbrochen und auch nicht eingerückt fortgesetzt.

(Da steht bei mir: " ; Ermittelt die Position...ursprügli"

"che Position..."

" Local $aPos...")

Wäre es nicht besser wenn man da einen manuellen Zeilenwechsel und einen Tabulator (z.B. hinter "wieder") einfügen würde, sodass der Satz immer ganz zu sehen ist und das ganze auch schöner aussieht?

Ich verwende Windows 10 bei 100 % Skalierung.

MfG:

BigRox

Hallo,

hier die nächsten.

Bei der Funktion "GUISetFont" steht bei "Parameter" im Abschnitt "attribute":

Und im Beispiel dazu steht:

 ; ; Schrift wird unterstrichen

MfG:

BigRox

Hallo,

hier noch einige Kleinigkeiten zum ändern.

In der Parameter-Beschreibung zur Funktion "FileReadToArray" steht:

Und in den Bemerkungen zur Funktion "FileReadToArray" steht:

Es ist @extended oder UBound() zuz verwenden, um die Anzahl der gelesenen Zeilen zu ermitteln.

MfG:

BigRox

Hallo Oscar,

Vielen Dank, auch von mir, für dieses Super-Programm.

MfG:

BigRox