AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Mengen mit kompletten Strings?

Ein Thema von Tpercon · begonnen am 29. Jan 2003 · letzter Beitrag vom 31. Jan 2003
Antwort Antwort
Seite 2 von 2     12   
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.105 Beiträge
 
Delphi 11 Alexandria
 
#11
  Alt 31. Jan 2003, 11:20
Moin TPercon,

unter der Voraussetzung, dass die Liste sortiert ist, könntest Du es mit einer Binären Suche machen, so wie TStringList.Find.

Das heisst erst wird der mittlere Eintrag geprüft.
Anhand des Ergebnisses (<,>,=) kann jetzt entschieden werden, in welcher Hälfte wieder der mittlere Eintrag geprüft wird.
Das dann solange, bis der Ergebnis = lautet, oder der Eintrag nicht vorhanden ist.

Bei 1000 Einträgen wären dass dann maximal 10 Vergleiche statt 1000.

Da Du bei der Enterprise Version ja auch die Sourcen mit dabeihast, kannst Du Dir das auch in TStringList.Find mal ansehen. (oder gleich eine TStringList nehmen )
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
Tpercon

Registriert seit: 7. Jun 2002
638 Beiträge
 
Delphi 5 Professional
 
#12
  Alt 31. Jan 2003, 21:50
Danke, jetzt weiß ich was du mit binär Suche meinst. Das Verfahren ist mir dann doch bekannt.

Gruß
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


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 04:11 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