Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi [Effektivität] Was ist sinnvoller (Liste/ein Eintrag anders) (https://www.delphipraxis.net/110829-%5Beffektivitaet%5D-ist-sinnvoller-liste-ein-eintrag-anders.html)

xZise 25. Mär 2008 14:08


[Effektivität] Was ist sinnvoller (Liste/ein Eintrag anders)
 
Hallo DP,
ich habe eine Liste mit Einträgen.
Nun möchte ich, wenn man auf ein Eintrag klickt, dass dort etwas passiert (z.B. es wird farblich markiert) und alle anderen sollen nicht markiert werden.

Ich fallen dort spontan 3 Möglichkeiten ein. Was wäre ab besten eurer Meinung nach?
(AIndex ist der Index des zu hervorhebenden Eintrags)

Möglichkeit 0:
Delphi-Quellcode:
for i := 0 to AIndex - 1 do
  Liste[i].<SetSomething>(false);

for i := AIndex + 1 to Count - 1 do
  Liste[i].<SetSomething>(false);

Liste[AIndex].<SetSomething(true);
Möglichkeit 1:
Delphi-Quellcode:
for i := 0 to Count - 1 do
  Liste[i].<SetSomething>(i = AIndex);
Möglichkeit 2:
Delphi-Quellcode:
for i := 0 to Count - 1 do
  Liste[i].<SetSomething>(false);

Liste[AIndex].<SetSomething(true);
Zu Möglichkeit 1: Man könnte dort statt des Vergleichs als Parameter auf eine if-Bedinung machen. Ich weiß aber nicht was dort besser wäre.

MfG
xZise

Muetze1 25. Mär 2008 14:20

Re: [Effektivität] Was ist sinnvoller (Liste/ein Eintrag and
 
Ich kapier die Frage nicht. Wenn ich die Frage von der Komponentenprogrammierung her betrachte, dann merke ich mir einen Index des ausgewählten Eintrages. Wenn ich beim Zeichnen bin, gebe ich im Aufruf mit, ob der laufende Listeneintrag der selektierte ist. Und wenn sich der selektierte Listeintrag ändert, dann markiere ich den Bereich des aktuellen Index als ungültig, setze den aktuellen Index auf den neuen Wert und markiere den aktuellen Index als ungültig. Gut ist.

Letzte Optimierung greift nur, wenn beim Zeichnen überprüft wird, ob der aktuelle Eintrag überhaupt gezeichnet werden muss. Stichworte: Delphi-Referenz durchsuchenTCanvas.ClipRect, Delphi-Referenz durchsuchenIntersectRect(), etc

Und allgemein zu deinen drei Vorschlägen: Du hast 2 betroffene Einträge, also den alten markieren und den neuen markierten. Warum rennst du aber über alle Einträge und fässt alle an? Warum nicht einfach gezielt auf den alten und den neuen Index zugreifen? Merke dir einen Old oder setze wie oben beschrieben den alten zurück, bevor du die neue Eintragsnummer übernimmst. Siehe OnChanging, etc, welche das Wechseln verhindern können und aber gleichzeitig den neuen Eintrag liefern ohne den alten verändert zu haben. Mit anderen Worten: Im OnChanging des z.B. TListView hast du mit ItemIndex/Selected Zugriff auf den aktuell selektierten (alten) Eintrag und der übergebene Eintrag ist der neue, zukünftige Eintrag.


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:34 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