2010/4/18 Stefan Mettenbrink <[email protected]>:
> Ich habe mir das Beispiel zu Folderitem mal angesehen (leicht geändert):
> Dim i,n as Integer
> Dim f as FolderItem
> f=SelectFolder
> n=f.count
> If n>0 then
> For i=1 to n
> ListBox1.addrow f.item(i).name
> Next
> End if
> Exception err as NilObjectException
> MsgBox "File not Found"
Das ist nicht gut programmiert, denn:
Wenn nur ein File davon nicht ansprechbar ist, dann brichst du gleich
ganz ab, also versuchst gar nicht mehr, die anderen Files zu zeigen.
Besser so:
for i = 1 to n
f2 = f.trueitem(i)
if f2 <> nil then
addrow f2.name
end
next
ausserdem: unbedingt trueitem() verwenden, damit du nicht verweisen
(aliases usw) folgst.
> Wie bekomme ich unter Mac OS die Dateien angezeigt, die mit ._ beginnen?
> Wie bekomme ich ein FolderItem von einer solchen Datei?
mit dem obigen code. die kommen einfach. Das OS filtert nix.
Wenn die files unsichtbar sein sollen, muss das programm die selbst
rausfiltern beim anzeigen.
es gibt ja FolderItem.Visible - nur musst du wissen, dass die files,
die mit "." beginnen, nicht visible=false haben, sonder true. das ist
ärgerlich, aber so ist es nunmal. d.h, wenn du unsichtbare files
ausfiltern willst, muss du sowohl auf "not visible" also auch auf
"f2.name.left(1) = ".") prüfen.
alles klar?
--
Thomas Tempelmann, http://www.tempel.org/
