Einzelnen Beitrag anzeigen

Benutzerbild von stahli
stahli

Registriert seit: 26. Nov 2003
Ort: Halle/Saale
4.343 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: Dictionary statt binärer Suche?

  Alt 8. Aug 2015, 12:02
Komisch, ich habe mir mal zur Fehlersuche den Inhalt des Dictionarys ausgeben lassen.
Dann hat es funktioniert - auch nach Entfernen der Logs.
Da hatte wohl der Linker irgend etwas verwurschtelt...?
Delphi-Quellcode:
// CodeSite.Send('Get:' + IntToStr(MyDict.Count));
// for Key in MyDict.Keys do
// begin
// S1 := Key.AsString;
// Value := nil;
// MyDict.TryGetValue(Key, Value);
// if Assigned(Value) then
// S2 := Value.Guid.AsString
// else
// S2 := 'nil';
// CodeSite.Send(S1 + ': ' + S2);
// end;
      if not MyDict.TryGetValue(aGuid, lGuid) then
        System.SysUtils.Beep;
Ich werde mal mit Dictionarys weiter arbeiten.
Danke für die Infos!
Stahli
http://www.StahliSoft.de
---
"Jetzt muss ich seh´n, dass ich kein Denkfehler mach...!?" Dittsche (2004)
  Mit Zitat antworten Zitat