Beiträge von Moombas

sidewinder Ich habe bei mir immer ein BinaryToString() drum herum, also so (um bei deinem Beispiel zu bleiben):

#include <Crypt.au3>
$g_hKey = _Crypt_DeriveKey(StringToBinary("CryptPassword"), $CALG_RC4); Hier machst du das Gleiche ja auch andersherum, was meine Vermutung bestätigt.
$sRead = "Test"
$dEncrypted = BinaryToString(_Crypt_EncryptData($sRead, $g_hKey, $CALG_USERKEY))
ConsoleWrite($dEncrypted & @CRLF) ;@CRLF nur für Lesbarkeit in der Konsole, funktioniert auch ohne!

Ich denke das Problem ist der Ausgabetyp, der durch ein einfügen eines Zeichens (egal ob ein leerer String oder Zeilenumbruch etc.) von Autoit dann implizit in einen String convertiert wird.

Welche Bedingung willst du denn da prüfen? Wenn ich es richtig verstehe willst du das ja nicht als Bedingung haben, sondern nur als Ordnernamen einbauen

$sFolder = 'E:\Test\' & $sNewDate
If StringInStr(FileGetAttrib($sFolder), 'DC') then
    ;Ordner
Else
    ;nicht vorhanden oder Datei
Endif

Stimmmt @Musashi Aber deinen Wrokaround dafür kannte ich acuh noch nicht. Wieder was gelernt.

Aber wie du schon sagst, kommt das eher selten vor und sollte normalerweise eigentlich auch vermieden werden.

Siehe: https://www.autoitscript.com/autoit3/docs/f…/FileExists.htm

Also:

If FileExists('E:\Test') then
    ;Etwas machen
Else
    ;Fehlermeldung/Ordner erstellen oder oder oder ;)
Endif

Wenn ich Dänen grundsätzlich nicht verstehen würde, hätte ich ein Problem, da mein Chef Däne ist und das Unternehmen Dänisch ist...

Naja egal, im Grunde kann man sich das mit Schleifen dann zusammen setzen.

Es gibt Wesen aus denen werde ich in diesem Leben nicht mehr schlau draus^^

Also doch deppert XD

Aber müssten das nicht generell mehr Ergebnisse sein?

1. Operator: '+'

1.-4. Zahl (als Beispiel): 1,2,3,4

Mögliche Ergebnisse:

1. 1+2 = 3 (W1 + W2)

2. 1+3 = 4 (W1 + W3)

3. 1+4 = 5 (W1 + W4)

4. 2+3 = 5 (W2 + W3)

5. 2+4 = 6 (W2 + W4)

6. 3+4 = 7 (W3 + W4)

Wenn ich aber Alina s Beschreibung etc. aus #18 nehme, nutzt man 4 Operatoren für "4" Rechnungen, welche von den 6 möglichen jedoch gemacht werden soll, steht nirgends.

Ich kann natürlich ab 2. bis 4. die anderen 3 Operatoren verwenden, aber welche sollen dann für 5. und 6. genutzt werden bzw. welche Rechnung soll ggf. nicht gemacht werden?

Aus meiner Sicht daher unvollständige Anforderung.

Er geht das bis zum Arrayende von $aOperator durch und fängt dann wieder von vorne an bis das Ende von $aArray_1 erreicht ist.

Bin ich jetzt irgendwie deppert?

Das ist doch das was meine Schleife macht. Auch wenn ich gerade einen kleinen Fehler gesehen habe.

;-- Textsample
;~ Global $Text      = 'A'

;~ While Mod(StringLen($Text), 4) <> 0
;~   $Text &= ','
;~ WEnd
;~ MsgBox(0, "", $Text & ' ' & StringLen($Text))

;-- Arraysample
Global $Result
Global Const $aOperator = [8, '+', '+', '*', '-', '-', '/', '-', '+']
Global Const $aArray_1  = [40, 20, 6, 19, 75, 20, 19, 6, 75, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40]
Global $Row = 1
While 1
    For $i = 1 to $aOperator[0]
;~         MsgBox(0, "", $aArray_1[$Row] & " " & $aOperator[$i] & " " & $aArray_1[$Row + 1] & " = " & Execute($aArray_1[$Row]&$aOperator[$i]&$aArray_1[$Row + 1]) & " und das in in Datei-X speichern")
        $Result = $aArray_1[$Row] & " " & $aOperator[$i] & " " & $aArray_1[$Row + 1] & " = " & Execute($aArray_1[$Row] & $aOperator[$i] & $aArray_1[$Row + 1]) & " und das in in Datei-X speichern" & @CRLF ;nur zur besseren lesbarkeit als Konsolenausgabe
        ConsoleWrite($Result) ;nur zur besseren lesbarkeit als Konsolenausgabe
        $Row += 2
        if ($Row + 1) > $aArray_1[0] then Exit
    Next
WEnd

Velted War das in meinem ersten Lösungsansatz für Alina nicht bereits ersichtlich? Das einzige was mich aktuell verwirrt ist ihre letzte Änderung XD

Ich stehe da gerade wieder wie in Ox vorm Berg . Brauche einen Alina-Translator

Ich denke du musst damit 2 Funktionen oder Schleifen bauen.

Ich verstehe dich so: Bei den ersten 8 wird zweimal diese Abfolge gemacht: '+', '+', '*', '-'

Danach die 16er Folge wie vorher bis zum Ende. Richtig?

hpb:

1. Die Fehlerabfrage gehört in die Funktion

2. Du musst die Funktion auch aufrufen, also ein copy() an der Stelle einfügen wo sie ausgeführt werden soll...

Edit: Wie gesagt ein ganzes skript wäre esser zur Fehlerfindung ansonsten ist hier angesagt.

Dann würde er aber bei Row = 40 auf Fehler laufen, da 40 + 1 = 41 und somit einen Bereich ansprechen würde der im Array nicht definiert ist.

Prüfe mal statt dessen: if ($Row + 1) > $aArray_1[0] then Exit

Ich mag halt ungern mögliche Fehlerquellen stehen lassen wenn sie offensichtlich sind, auch wenn diese in deiner anwendung wohl nicht vorkommen werden

OT:

Wenn du schon den Titel änderst, hättest du auch das fehlende "e" hinzufügen können

Als Beispiel was bei mir funktionierte (kürzeste Versionen die ich hinbekomme):

Für a)

While Mod(StringLen($Text), 4) <> 0
  $Text &= Chr(32)
WEnd

Für b)

Const $aOperator = [16, '+', '+', '*', '-', '-', '/', '-', '+']
Const $aArray_1  = [16, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16]

$Row = 1
While 1
    For $i = 1 to $aOperator[0]
        MsgBox(0, "", $aArray_1[$Row] & " " & $aOperator[$i] & " " & $aArray_1[$Row + 1] & " = " & Execute($aArray_1[$Row]&$aOperator[$i]&$aArray_1[$Row + 1]) & " und das in in Datei-X speichern")
        $Row += 2
        if $Row > ($aArray_1[0] - 2) then Exit
    Next
WEnd

a) If not Mod(StringLen($Text), 4) = 0 then bzw.

While Mod(StringLen($Text), 4) <> 0
  $Text &= Chr(32)
WEnd

b) Nicht getestet aber das Prinzip müsste passen, wenn ich auch den Sinn noch nicht verstanden habe...

$Row = 1
While $Row <= 20
For $i = $Row To $Row + 3 ;$aArray_1[0]
    MsgBox(0, "", $Row & "-" & $Row+3 & " $aArray_1[" & $i & "] - " & $aArray_1[$i] & "    Später mit arbeiten und Resultat in Datei-X speichern.")
Next
$Row += 4
//nächster Durchlauf
WEnd

Musashi war schneller XD

Schon mal WinGetPos() probiert und geprüft ob du hier auch diese "Übereinstimmung/Differenzen" hast?

Ich gehe davon aus, das du mit Winmove() die Fenster positionierst.

Ich würde das eher in eine (verschatelte) Case Abfrage einbauen anstatt der ganzen If-Then Blöcke.

Auch würde ich anstatt der Verwendung der Globalen Startzahl in den Funktion Lokale Variablen bevorzugen und eine Übergabe an die Funktionen machen. (das ist aber rein persönlicher Geschmack).

Und dein Local $i ist eigentlich Global (zumindest wenn das oben der ganze Code ist und nicht in einer Funktion steckt).

Hmm, okay, macht Sinn.

Warum For $iIndex = 2 To $aFolders[0] ?

Das müsste doch bei 1 starten also: $iIndex = 1 To $aFolders[0]

Erklärt meiner Meinung nach aber noch nicht das Proble, das ein ungültiger Zugriff erfolgt.

Kannst du dir mal ausgeben lassen, auf Welche Zeile er zugreifen will + schauen ob diese überhaupt existiert?

So z.B.:

        If $aFolders[0] > 1 Then ; Access subfolders
            _ArrayDisplay($aFolders) ; Zu Testzwecken 
            ConsoleWrite("XXXZeile  974") ; Zu Testzwecken 
            For $iIndex = 2 To $aFolders[0]
                ConsoleWrite("XXXZeile  976 Ix=" & $iIndex "Max=" & $aFolders[0]) ; Zu Testzwecken
                If $aFolders[$iIndex] <> "" Then
                   ConsoleWrite("XXXZeile  978 Ix=" &$iIndex & "T"& $aFolders[$iIndex] ) ; Testzwecken
                    $oFolder = $oFolder.Folders($aFolders[$iIndex])
                    If @error Or Not IsObj($oFolder) Then Return SetError(4, $iIndex, "")
                EndIf
            Next
        EndIf

Tja wenn das so einfach wäre, würde es nicht so viele gecrackte Steam Spiele geben.

Ich dneke die Krux liegt im Offline-Modus von Steam. Dieser macht keinen Sinn für einen Multiplayer (zumindest heutzutage). Ggf. kannst du prüfen ob das Spiel im Online- oder Offline-Modus gestartet wurde und entsprechend den Mod abschalten.