Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#7

Re: Verzeichnisliste mit definierter Rekursionstiefe erstell

  Alt 30. Mai 2009, 10:17
Ich hoff auch der Code läuft so

Ansonsten läßt es sich ja noch verbessern:
  • leere Verzeichnisse (welche ohne Dateien drin) ignorieren/nicht anzeigen
  • nur leere Verzeichnisse anzeigen
  • Sortieren (z.B. nach Datum der Erstellung/letzen Änderung)
  • nur Verzeichnisse mit bestimmten Dateien (via Maske) anzeigen
  • ...
  • Delphi-Quellcode:
    if (Length(ParamStr(i)) > 3) and ((ParamStr(i)[1] = '-') or (ParamStr(i)[1] = '/')) then
      if ParamStr(i)[2] in ['p', 'P'] then
    warum hab ich da Gleiches unterschiedlich behandelt?
    and (ParamStr(i)[1] in ['-', '/']) then
  • na gut, dafür ist in [chars] nicht wirklich Unicode(D2009)-tauglich
  • ...
  • ich bin vielleicht etwas brutal und hab hier Linux- und Windowsstandard gemischt ( - und / )
  • und man müßte (wenn man es mag) nichtmal eine Stringliste verwenden ... das gute, alte WriteLn gibt's ja auch noch

Nja, ich hoff etwas geholfen zu haben ... es macht sich immer etwas besser, wenn sich Programme ähnlich bediehnen lassen, wie Andere.
Find es aber schade, daß seitens Delphi die Parameterabfrage etwas umständlich ist und man selber parsen/suchen muß.
$2B or not $2B
  Mit Zitat antworten Zitat