XProfan

Español

Thomas
Zielinski

Yo bräuchte una Code el número de Datein que en un determinado Ordner befinden a bestimmen. Mir fällt aber nichts a una. Hatt alguien vorschlag?
Saludo Thomas

XProfan X4; Win10 x64
Der Kuchen ist eine lüge!

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

@Thomas Hatte el código ya veces hier geschrieben - entonces war el todo Hilo futsch un nu isser otra vez como ;) Kompilieren Marca Separación DECLARE pfad$ DECLARE listbox1& pfad$=C:TEMP CHDIR pfad$ CLS CLEARLIST listbox1&=CREATE(LISTBOX,%HWnd,,50,20,300,350) ADDFILES . MoveListToHandle(listbox1&) print GetCount(listbox1&) WAITINPUT
	17.03.2008 ▲ Vollständiges Zitat Absatzweise Cita Zeilenweise Cita

Thomas
Zielinski

Gut danke! Werds heut Nachmittag a Casa veces ausprobieren.
Saludo Thomas

XProfan X4; Win10 x64
Der Kuchen ist eine lüge!

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Nico
Madysa

Usted musst lo natürlich no necesariamente en un Listbox übertragen. Nach AddFiles *.* kannst auch igual una imprimir (%GetCount + 1) folgen, el funktioniert genauso-

Nico Madysa

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

In diesem Zusammenhang otra vez el kleine addfiles.dll: [...]

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Thomas
Zielinski

Nach kurzem adaptar y el determinar el mein Interpreter kein MoveListToHandle a kennen a scheint, klappt el Code de Horst wunderbar. Aunque brachte me el Code siempre 2 Archivos más que eigentlich en el Ordner waren. Diese hatten beide como bezeichnung en el Listbox: [..]. Hab el zuvielen simplemente abgezogen y jetz funzt lo Wunderbar.
Saludo Thomas

XProfan X4; Win10 x64
Der Kuchen ist eine lüge!

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Thomas

[..] son Verzeichnisse y no Archivos. Hay no siempre zwei - Lese veces el Ayuda a Addfiles *.* - Ahí está el Erklärung

Sorry - MovelistToList(handle&) wäre con usted correcto gewesen

y cómo Nico correcto bemerkte - el Listbox muss no ser. War sólo wegen el Optik esta ;)

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

H.Brill

Kann uno auch muy schön benutzen, a
Größe uno Ordners + Unterordner determinar:
Kompilieren Marca Separación

Cls
Print GetFolderSize("C:\Temp\")
Waitkey

Proc GetFolderSize

    Parameters Pfad$
    Declare size&
    ClearList
    AddFiles *Pfad$ + "*.*"

    WhileLoop 0, %GetCount

        size& = size& + FileSize(GetString$(0, &LOOP))

    EndWhile

    Return size&

ENDPROC

Man debería no necesariamente el Windows-Ordner
nehmen, Luego se lo langsam. Ansonsten aber
bastante brauchbar.
Kann uno auch en KB ajustar, indem uno por
1024 teilt y Decimals en 2 stellt y una Float zurück son.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

25.01.2015 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jörg
Sellmeyer

Wenn uno vorhat größere Verzeichnisse (evtl con Unterordnern) a scannen, muss uno incluso necesariamente en Float zurückgreifen y el ya en Addition anwenden. Ansonsten hay vollkommen falsche Summen, como long para heutige Festplattengrößen no mehr ausreicht. Mit Quad (aktuelle Profanversion) debería uno algo länger auskommen.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...