Beiträge von BugFix

Das hier sollte dir helfen: FolderStruct - Ordnerstruktur in Datei speichern / aus Datei erstellen

Der Link in Post 1 (diesem Thread) passt seit der Forumsumstellung nicht mehr, das ist das Ziel: Anlegen vieler Verzeichnisse und Unterverzeichnisse aus Dateiliste möglich?.

Du kannst auch mit einzelnen Ctrl arbeiten und diese dynamisch erstellen. Ist aber selten sinnvoll. Die Ctrl-ID solltest du aber sinnvollerweise in einem Array führen.

Hier mal ein Bsp. mit Inputs:

Global $GUI, $aInput[2] = [1], $btAdd

$GUI = GUICreate('Test', 400, 50)
$aInput[1] = GUICtrlCreateInput('', 10, 10, 300, 21)
GUICtrlSetResizing(-1, 802) ; $GUI_DOCKALL
$btAdd = GUICtrlCreateButton('Add Input', 320, 10, 70, 21)
GUICtrlSetResizing(-1, 802) ; $GUI_DOCKALL
GUISetState()

While 1
    Switch GUIGetMsg()
        Case -3
            Exit
        Case $btAdd
            _NewCtrl()
    EndSwitch
WEnd

Func _NewCtrl()
    Local $iDiff = 31     ; == Abstand + Höhe ==> 10 + 21
    Local Static $iY = 10 ; == Startwert vom ersten Ctrl
    $iY += $iDiff
    $aInput[0] += 1
    ReDim $aInput[$aInput[0]+1]
    Local $aWin = WinGetPos($GUI)
    WinMove($GUI, '', $aWin[0], $aWin[1], $aWin[2], $aWin[3] + 31)
    $aInput[$aInput[0]] = GUICtrlCreateInput('', 10, $iY, 300, 21)
    GUICtrlSetResizing(-1, 802) ; $GUI_DOCKALL
EndFunc

Man kann übrigens sehr schön die Fülle an Funktionen der _GuiCtrlListBox_ -UDF in Verbindung mit einer Combobox nutzen.

Wenn man das Handle der Liste einer Combobox abfragt, kann man dieses mit den Funktionen der Listbox-UDF bearbeiten. (Dann spart man sich z.B. das Zusammenpfriemeln der Item.)

Hier ein Bsp.

#include <GuiListBox.au3>

$sDir = @ScriptDir & '\*.*'

$hGui = GUICreate('Test')

$idCombo = GUICtrlCreateCombo('', 10, 10)
$hComboList = _GuiCtrlComboBox_GetListHwnd($idCombo)

_GUICtrlListBox_Dir($hComboList, $sDir)

GUISetState()

Do
Until GUIGetMsg() = -3

; #FUNCTION# ====================================================================================================================
; Name ..........: _GuiCtrlComboBox_GetListHwnd
; Description ...: Returns the handle of the list of a combo box
; Parameters ....: $_hCombo    ID or handle from combo box
; Return values .: Success     The list handle
;                  Failure     0 @error: 1
; Author ........: BugFix
; ===============================================================================================================================
Func _GuiCtrlComboBox_GetListHwnd($_hCombo)
    If Not IsHWnd($_hCombo) Then $_hCombo = GUICtrlGetHandle($_hCombo)
    Local $tagCOMBOBOXINFO = 'struct;dword cbSize;int[4];int[4];dword stateButton;hwnd hwndCombo;hwnd hwndItem;hwnd hwndList;endstruct'
    Local $tCOMBOBOXINFO = DllStructCreate($tagCOMBOBOXINFO)
    DllStructSetData($tCOMBOBOXINFO, 'cbSize', DllStructGetSize($tCOMBOBOXINFO))
    Local $pCOMBOBOXINFO = DllStructGetPtr($tCOMBOBOXINFO)
    Local $aRet = DllCall('user32.dll', 'int', 'GetComboBoxInfo', 'hwnd', $_hCombo, 'ptr', $pCOMBOBOXINFO)
    If Not @error Then
        Return DllStructGetData($tCOMBOBOXINFO, "hwndList")
    Else
        Return SetError(1,0,0)
    EndIf
EndFunc

Zitat von Bitnugger

aber das funktioniert doch nur, wie auch alle anderen LUA-Scripte von BugFix, mit SciTE4AutoiIt3.

...und das basiert - genau wie ISN Studio - auf Scintilla. Eine Anpassung ist also recht problemlos möglich.

Ich habe mit ISN bisher nicht gearbeitet, denke aber, dass ISI360 so etwas Essentielles bestimmt schon integriert hat.

Danke erstmal für die Tipps.

Also was Stabilität angeht, funktioniert (bzw. funktionierte damals) GRUB tadellos. Die Einrichtung ist etwas gewöhnungsbedürftig, weil die Reihenfolge der Hardwarekomponenten anders geregelt ist, als bei Windows. Das Verstecken von Partitionen funktioniert auch sicher.

Der Hinweis mit dem Abschalten des Hybridstarts ist natürlich wichtig - m. M. nach sowieso etwas völlig Überflüssiges.

Ich werde dann mal berichten, wenn ich den PC bekommen und eingerichtet habe.

Hi,

ich bekomme jetzt einen PC mit installiertem Win10. Das möchte ich natürlich nicht im produktivem Einsatz nutzen, sondern eher als Testumgebung.

Da die Hardware glücklicherweise noch Win7 unterstützt, werde ich dieses auf einer zweiten HDD installieren.

Wie bekomme ich am besten ein Dualboot-System gebastelt? Zu XP Zeiten hatte ich das mit 3 OS auf einer HDD über GRUB realisiert.

Was würdet ihr empfehlen? Wichtig ist mir, dass die nicht aktive HDD für die andere HDD auch nicht sichtbar ist.

Das erinnert mich an die Probleme in meinem GuiCtrlBusy - wie ToolTip, nur anders ;-) - Final [v1.0]. Da habe ich auch sporadische Fehler, die wohl in den WinProc begründet aber leider nicht wirklich auffindbar sind.

Tipp: Pfadangaben nicht hardcoden.

Deine *.txt und deine Logfiles sind fest im Skript codiert. Ich würde das flexibel gestalten (mit INI oder Programmparameter)

- wenn INI vorhanden --> verwende Pfade von dort -->sonst: @ScriptDir & "\..."

Oder

- wenn Startparameter übergeben ( /txt='Pfad\Datei.txt' /log1='Pfad\Log1Datei.log' /log2='Pfad\Log2Datei.log' - oder ähnlich) --> verwende diese Pfade, sonst: s.o.

Vielleicht helfen dir auch ein paar alte Skripte von mir:

Kalender Control (wie Win7 Datums-Control)

Kalender Creator

Habe jetzt einen anderen PC verwendet.

Verbindung kommt zustande, aber dann ist leider Schluß:

odin_fail.PNG

Was kann man noch probieren?

EDIT

Jetzt komme ich übrigens nicht mehr in den DL-Mode, erhalte nur noch diese Anzeige:

flash_fail_kies.jpeg

Lässt sich auch nicht abschalten oder zurücksetzen.

Hmm, maximal enttäuschend.

- Odin und Fw heruntergeladen und entpackt

- Samsung USB Treiber installiert

- Tablet in Download-Mode versetzt

- Tablet per USB mit PC verbunden

...es passiert: NICHTS

Dann habe ich das Tablet wieder ausgeschaltet und im normalen Modus gestartet (wo es beim Logo hängen bleibt). Mit PC verbunden und prompt werden die Treiber installiert.

Dasselbe nochmals im DL-Mode probiert. - Keine Chance, in diesem Mode wird das Tab nicht als USB-Gerät erkannt und ergo werden keine Treiber installiert.

Heute habe ich Zeit und werde jetzt mal testen.

Gebe Bescheid, was draus wird.

Die Modellnummer ist interessanterweise nirgendwo physisch am Gerät angebracht, man kann sie ausschliesslich digital auslesen.

Das Modell ist SM-T310, aber da gibt es verschiedene Ausführungen. Ich habe die Fw ausgewählt nach der Angabe im Bootmenü: T310XXSBQB2

OMG - Samsung bietet keine Fw-DL an (zumindest habe ich das nicht gefunden) und die anderen Anbieter wollen mit ihrem Angebot nur Kohle verdienen. Schnelle Links (also normaler DL) gibts nur gegen Geld. Andere Links werden auch angeboten, sind aber extrem gedrosselt: 0,05 MB/s

Naja, morgen früh wirds runtergeladen sein, Nachtschicht für den Rechner.

Hi,

mein Tablet versagt den Dienst, es bootet nicht mehr - bleibt hängen beim Logo "Samsung Galaxy Tab3".

Ich wollte dann Werksreset durchführen, das kam dabei raus:

android_recovery_fail.jpeg

Heißt das jetzt, dass der interne Speicher Schrott ist?

Kann ich noch irgendetwas tun?

Nur 5 Threads unter deinem: WindowDocking

Vielleicht ist diese UDF für dich hier hilfreich. Durch die Form der Speicherung hast du sofort die erforderlichen Daten zum Erstellen der TreeviewItem.

Hier das Makro. Habe alles kommentiert, kannst dann bei Bedarf Änderungen vornehmen.

Sub GenerateNumbers()
    ' erste Zeile mit Bereichswerten
    Dim iStart As Integer
    iStart = 2
    
    ' letzte Zeile mit Bereichswerten
    Dim iMax As Integer
    iMax = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
    
    ' Arrays zum Splitten Von/Bis
    Dim aVon
    Dim aBis
    
    ' die Spalte, in die das Ergebnis geschrieben wird, hier beginnt es
    ' mit "3" (C), kann man auch noch eine Leerspalte zwischen setzen
    Dim iWriteCol As Integer
    
    ' Schleife für alle Bereichswerte
    For i = iStart To iMax
        ' Von - Bis Artikel und Farbcode trennen
        aVon = Split(Cells(i, 1).Value, "-")
        aBis = Split(Cells(i, 2).Value, "-")
        iWriteCol = 3
        ' Artikel hochzählen und mit Farbcode kombinieren
        For k = aVon(0) To aBis(0)
            Cells(i, iWriteCol).Value = k & "-" & aVon(1)
            iWriteCol = iWriteCol + 1
        Next k
    Next i
    MsgBox ("FERTIG!")
End Sub

EDIT:

In Post #5 schreibst du, dass du die Liste, die du hast von Hand filterst und ersetzt - Warum?

Im folgenden Bsp. erledigt das Makro das alles in einem Aufwasch.

Sub GenerateNumbers()
    ' erste Zeile mit Bereichswerten
    Dim iStart As Integer
    iStart = 1
    
    ' letzte Zeile mit Bereichswerten
    Dim iMax As Integer
    iMax = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
    
    ' Arrays zum Splitten Von/Bis
    Dim aVonBis
    Dim aVon
    Dim aBis
    
    ' die Spalte, ab der das Ergebnis eingetragen wird
    Dim iWriteCol As Integer
    
    ' Schleife für alle Bereichswerte
    For i = iStart To iMax
        ' VonBis.jpg in Von und Bis trennen, ".jpg" abschneiden
        aVonBis = Split(Cells(i, 1), "bis")
        aVonBis(1) = Left(aVonBis(1), InStrRev(aVonBis(1), ".") - 1)
        
        ' Von - Bis Artikel und Farbcode trennen
        aVon = Split(aVonBis(0), "-")
        aBis = Split(aVonBis(1), "-")
        
        ' Artikel hochzählen und mit Farbcode kombinieren und in Tabelle eintragen
        iWriteCol = 3 ' Spalte ab der eingetragen wird (3 = C)
        For k = aVon(0) To aBis(0)
            Cells(i, iWriteCol).Value = k & "-" & aVon(1)
            iWriteCol = iWriteCol + 1
        Next k
    Next i
    MsgBox ("FERTIG!")
End Sub

Spalte A die Ausgangswerte, Spalte C ff. die Ergebnisse.

Zitat von Springstil

Am besten wäre es auch wenn ich die zahlen nach - selber wählen kann die er mir überall mit rein schreibt.

Das hast du im Startpost geschrieben. In deinem Bsp. taucht das aber nicht auf, da wird nur der vordere Teil hochgezählt und mit dem hinteren Teil kombiniert. Soll auch die Möglichkeit bestehen, den hinteren Wert in einem Von-Bis hochzuzählen?

Und ganz wichtig: Alle Von-Bis stehen untereinander - Wohin sollen die Ergebnisse, extra Sheet?

Es ist immer besser, wenn du die genaue Form der gewünschten Ausgabe als Bsp. zeigst.

Du sagst in A steht Von und in B steht Bis. Aber welcher Teil, steht dort? Die Nummer mit Bindestrich? Soll das z.B. so im Ergebnis sein?