Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by silentAMD,
31. Dez 2004
also bei mir braucht das nämlich net so lang... wahrscheinlich hast du ein verzeichnis von 2500 exe dateien und hast ein virenprogramm wie antivir drauf, das den vorgang derb verlangsamt...
und genau deswegen (weil ich immer ein antivirenprog drauf hab) hab ich mir einfach nen filemanager zusammengebastelt, der nicht die windowssymbole ausliest.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by silentAMD,
31. Dez 2004
hi,
die möglichkeit von Muetze1 ist leider so um die 60% langsamer (bei 1000000 durchläufen)...
hier die wertetabelle:
meine möglichkeit: ~ 0,835528537844894
Muetze1's: ~ 1,40521434986849
Christian Seehase's: ~ 0,802533841591599
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by silentAMD,
30. Dez 2004
wow danke für die arbeit!!!!! :thumb:
das is ja sowas wie ein array im array oder?
muss gleich mal testen obs schneller geht....
THANX!!!
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by silentAMD,
30. Dez 2004
hmmm.... ich hab den code einfach von den sources von delphi übernommen und habs so abgeändert, dass nur die datei-endung ohne punkt erscheint... also ich hab "nur" 2166 mhz und bei mir macht die funktioin schon bei ca. 10000 dateien einen größeren unterschied als 4 sekunden!
da wirst du warscheinlich mit deiner übertakteten cpu mit über 3,8 ghz drangegangen sein... :wink:
wenns wirklich...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by silentAMD,
30. Dez 2004
hi,
ich in meinem dateimanager mit unten stehender funktion eine zahl aus, um den passenden imageindex eines objekts in einer dateiliste im listview je nach dateityp herauszubekommen. (also e ist dann der dateiname)
function TFenster.GetImgIndex(e: String): Byte;
var
i: Integer;
begin
RESULT := 17;
i := LastDelimiter('.'+PathDelim+DriveDelim, e);