AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi Kontrolliertes Speichern bei dpCollection?
Thema durchsuchen
Ansicht
Themen-Optionen

Kontrolliertes Speichern bei dpCollection?

Ein Thema von alcaeus · begonnen am 13. Apr 2005 · letzter Beitrag vom 13. Apr 2005
 
Benutzerbild von Jens Schumann
Jens Schumann

Registriert seit: 27. Apr 2003
Ort: Bad Honnef
1.644 Beiträge
 
Delphi 2009 Professional
 
#6

Re: Kontrolliertes Speichern bei dpCollection?

  Alt 13. Apr 2005, 09:44
Hallo alcaeus,
was ein bißchen Code doch ausmacht. Jetzt habe ich Dich verstanden.
Ich würde das mit dem Index vergessen und tatsächlich die Collection
durchlaufen bis ich die richtige Option gefunden habe. Wenn Du nicht
gerade 1000sende Optionen gespeichert hast dürfte man den Geschwindigkeitsnachteil
nicht merken. Das casten dauert bestimmt länger.

Dafür würde ich TJsCollection oder TmxJsCollection wie folgt erweitern.

Delphi-Quellcode:
...
  function GetOptionItem(aOptionname : String) : TOptionItem;
...
  property Option[aOptionname : String] TOptionsItem read GetOptionItem;
...

function TJsCollection.GetOptionItem(aOptionname : String) : TOptionsItem;
var
  iCnt : Integer;
  _Optionname : String;
begin
  Result:=Nil;
  _Optionname:=AnsiUpperCae(aOptionname);
  For iCnt:=0 to Count-1 do
    begin
       // evt muss hier noch nach TOptionsItem gecastet werden
    If AnsiUpperCase(Items[iCnt].Optionname)=_Optionname then
      begin
      Result:=Items[iCnt];
      Exit;
      end;
    end;
end;
Damit kannst Du die Option über den Optioname ansprechen
I come from outer space to save the human race
  Mit Zitat antworten Zitat
 


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 02:07 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz