SD Karten Speicher auslesen..

  • Hey leute,

    ich will mir ein kleines Tool machen das mir anzeigt wie viel Speicher ich noch auf meinem USB Stick oder auf meiner SD Karte habe.
    Ich habe mir dazu ein paar alte Code´s von mir raus gesucht.
    Dabei habe ich das gefunden.

    [autoit]


    $var = DriveSpaceFree( "d:\" )
    $Label18 = GUICtrlCreateLabel("Freier Speicher: "&$var& " MB")

    [/autoit]

    Nur will ich es jetzt so machen, das bevor angezeigt wird wie viel Speicher noch Frei ist oder belegt das ich das Laufwerk wählen kann.
    Wie kann ich das am besten anstellen??

  • hier mal ein beispiel aus einem meiner scripts ( eine art explorer )

    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>
    #include<GUILISTVIEW.au3>
    #include<string.au3>
    #include<file.au3>
    #include<array.au3>
    #include<guiimagelist.au3>
    #Region ### START Koda GUI section ### Form=

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    If @error Then

    MsgBox(0, "Fehler", "Keine Wechselmedien erkannt!")
    Exit
    EndIf
    $Form1_1 = GUICreate("Öffnen", 624, 419, 190, 121)
    GUISetBkColor(0x11354D)
    $ListView1 = _GUICtrlListView_Create($Form1_1, "", 16, 24, 593, 345, BitOR($LVS_REPORT, $LVS_SHOWSELALWAYS,$LVS_NOSORTHEADER))
    _GUICtrlListView_SetExtendedListViewStyle($listview1, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES))

    [/autoit][autoit][/autoit][autoit]

    $imagelist=_GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($imagelist, @SystemDir & "\shell32.dll", -8)
    _GUIImageList_AddIcon($imagelist, @SystemDir & "\shell32.dll", -5)
    _GUIImageList_AddIcon($imagelist, @SystemDir & "\shell32.dll", 128)
    _GUIImageList_AddIcon($imagelist, @SystemDir & "\shell32.dll", -24)
    _GUICtrlListView_SetImageList($ListView1, $imagelist,1)
    _GUICtrlListView_AddColumn($ListView1, "Name", 589)
    $drives = DriveGetDrive("REMOVABLE")
    For $i = 1 To $drives[0]
    $text = DriveGetLabel($drives[$i])
    If $text = "" Then $text = "Wechseldatenträger"
    _GUICtrlListView_AddItem($ListView1, $text & " (" & $drives[$i] & ")",0)
    Next
    $Button1 = GUICtrlCreateButton("Hinzufügen", 512, 376, 99, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("<<<", 16, 0, 35, 25, $WS_GROUP)
    $Button3 = GUICtrlCreateButton("Aktuallisieren", 480, 0, 70, 25, $WS_GROUP)
    $input1 = GUICtrlCreateInput("Wechselmedien", 136, 0, 337, 21, $ES_READONLY)
    GUISetState(@SW_SHOW)
    while 1
    Sleep(1000)
    WEnd

    [/autoit]

    is nur nen code ausschnitt
    muss halt noch an deinen zweck angepasst/vervollständigt werden

    GREEZ

  • Ja so in der Art hatte ich es mir vorgestellt.
    Nur will ich das ganze so machen das man sehen kann wie viel Speicher noch Frei ist und wie viel belegt.
    Und ich will noch eine Anzeige machen wo man sehen kann wie viel Bilder man zum Beispiel noch machen kann...

    [autoit]


    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=D:\Programmieren\SD Karten\DES\SD-Reader.kxf
    $Form1_1 = GUICreate("SD - Karten Speicher berechner", 297, 251, 195, 153)
    $Label1 = GUICtrlCreateLabel("SD-Karte Freier Speicher:", 8, 8, 149, 17)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Progress1 = GUICtrlCreateProgress(8, 24, 265, 17)
    $Label2 = GUICtrlCreateLabel("SD-Karte Speicher (in MB):", 8, 48, 131, 17)
    GUICtrlSetFont(-1, 8, 400, 4, "MS Sans Serif")
    $FS = GUICtrlCreateLabel("Freier Speicher:", 8, 72, 94, 17)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("Belegter Speicher:", 8, 96, 109, 17)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Label4 = GUICtrlCreateLabel("Bei einer Bilder größe 4-5MB können noch ca.:", 8, 120, 225, 17)
    GUICtrlSetFont(-1, 8, 400, 4, "MS Sans Serif")
    $Label5 = GUICtrlCreateLabel("Label5", 8, 144, 42, 17)
    GUICtrlSetFont(-1, 8, 800, 2, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit][autoit][/autoit][autoit]

    EndSwitch
    WEnd

    [/autoit]