AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

nach doppelten dateinamen suchen

Ein Thema von jAcK oRsEn · begonnen am 16. Jun 2004 · letzter Beitrag vom 19. Jun 2004
Antwort Antwort
jAcK oRsEn

Registriert seit: 29. Mai 2004
Ort: Weeze
118 Beiträge
 
#1

nach doppelten dateinamen suchen

  Alt 16. Jun 2004, 18:16
hi,

wie kann ich nach doppelten dadateinamen suchen lassen?

mal so nen ansatz? jetzt kommt nicht an mit findfirst, findnext, denn etwas mehr säwre sicher von vorteil!
Greetz

jAcK oRsEn
  Mit Zitat antworten Zitat
Nicodius

Registriert seit: 25. Apr 2003
Ort: Graz
2.234 Beiträge
 
Delphi 2006 Architect
 
#2

Re: nach doppelten dateinamen suchen

  Alt 16. Jun 2004, 18:21
meinst du jetzt unter windows oder hast du sie scho nwo reingeladen?


schlreifen
Nico Müller
  Mit Zitat antworten Zitat
jAcK oRsEn

Registriert seit: 29. Mai 2004
Ort: Weeze
118 Beiträge
 
#3

Re: nach doppelten dateinamen suchen

  Alt 16. Jun 2004, 18:25
ne unter windows mit delphi!!!!


ja, ich brauche infos
Greetz

jAcK oRsEn
  Mit Zitat antworten Zitat
Benutzerbild von Dani
Dani

Registriert seit: 19. Jan 2003
732 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: nach doppelten dateinamen suchen

  Alt 16. Jun 2004, 18:30
Hi!

FindFirst, FindNext, ExtractFileName, THashedStringlist, THashedStringlist.IndexOf
Das ist doch schonmal mehr

Du speicherst alle Suchergebnisse in einer Stringliste. Bei jeden Fund schaust du mit IndexOf nach, ob der Dateiname bereits in der Liste steht. Beispiele und Beschreibungen für alle genannten Funktionen gibts in der Online Hilfe.

Alternativ dazu kannst du die Suchergebnisse auch in einer Schleife von oben nach unten durchgehen.
z.B.

Delphi-Quellcode:
procedure DeleteDuplicates(aStrList: THashedStringlist);
var i: Integer;
begin
 i := aStrList.count-1;
 while i > -1 do
  begin
   If aStrList.IndexOf(aStrList[i])<>i then
    aStrList.Delete(i);
   dec(i);
  end;
end;
Gruß,
Dani
Dani H.
  Mit Zitat antworten Zitat
jAcK oRsEn

Registriert seit: 29. Mai 2004
Ort: Weeze
118 Beiträge
 
#5

Re: nach doppelten dateinamen suchen

  Alt 16. Jun 2004, 18:38
hab keine ahnung wie das funktionieren soll
Greetz

jAcK oRsEn
  Mit Zitat antworten Zitat
Benutzerbild von Dani
Dani

Registriert seit: 19. Jan 2003
732 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: nach doppelten dateinamen suchen

  Alt 19. Jun 2004, 14:57
Herr, vergib mir diese while-Schleife

Delphi-Quellcode:
procedure DeleteDuplicates(aStrList: THashedStringlist);
var i: Integer;
begin
for i:=aStrList.count-1 downto 0 do
 If aStrList.IndexOf(aStrList[i])<>i then
  aStrList.Delete(i);
end;
Dani H.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz