Hello Martin.
I have excellent result with this:
var
x : integer;
datalist_files : tfiledatalist;
begin
datalist_files := tfiledatalist.create();
// This does not work --->
// datalist_files.mask := '"*.mp3" "*.wav" "*.ogg" "*.flac"';
datalist_files.adddirectory('/home/fred/mp3/Home cookin',fil_ext1);
datalist_files.options := [flo_sortname,flo_sorttype];
demogrid.rowcount := datalist_files.count;
for x := 0 to datalist_files.count -1 do
begin
demogrid[0][x] := datalist_files.items[x].name;
demogrid[1][x] := fileext(datalist_files.items[x].name);
demogrid[2][x] := inttostr(datalist_files.items[x].extinfo1.size div 1000) +
' kb';
demogrid[3][x] :=
formatdatetime('YYYY-MM-DD',datalist_files.items[x].extinfo1.ctime);
end;
end;
See picture:
<http://mseide-msegui-talk.13964.n8.nabble.com/file/t2/mseextfilelist.png>
But how to apply a filter/mask ?
Thanks.
Fre;D
--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
