Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by aMuTeX,
9. Jun 2004
Danke!
Und so gehts sogar ziemlich einfach:
if FindFirst(directory+'*.*', $23, search) = 0 then
begin
repeat
if Pos(UpperCase(ExtractFileExt(Search.Name)), UpperCase(Mask)) > 0 then
Files.Add(directory + search.Name);// add the files to the list
until FindNext(search) <> 0;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by aMuTeX,
9. Jun 2004
Da war wohl einer schneller ;-)
Das Tempo hier überrascht einmal mehr.....
Was ist schneller, nach jeder Ext. separat suchen oder nach *.* suchen und dann selbst filtern?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by aMuTeX,
9. Jun 2004
Das hab ich schon gesehen. Nur wird da ja auch nur nach RootFolder+Mask gesucht. Das kommt also aufs gleiche raus wie ich es schon versucht habe.
Oder wie muss dann Mask aussehen damit es geht?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by aMuTeX,
9. Jun 2004
Hallo zusammen.
Wie kann ich nach Files mit verschiedenen FileExtesions suchen? Also ich weiss das ich mit FindFirst/FindNext Files rekursiv suchen kann. Ich kann auch nach best. FileExt suchen, z.B. alle *.txt Files. Nur wie kann ich mehrere FileExtensions als Maske übergeben? Ich will alle Files mit *.txt;*.doc;*.rtf finden. Wie muss der Path Parameter aussehen damit das klappt? Folg. geht...