Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi [Gelöst] ListView auslesen gruppiert nach Datum (https://www.delphipraxis.net/165092-%5Bgeloest%5D-listview-auslesen-gruppiert-nach-datum.html)

Pitri2 14. Dez 2011 17:39


[Gelöst] ListView auslesen gruppiert nach Datum
 
Hallo liebe Community,
ich hoffe Ihr könnt mir helfen.

Also ich habe ein ListView mit mehreren Spalten und Zeilen.
Die 1. Spalte enthält immer ein Datum.
Ich möchte nun alle Einträge durchgehen und diese als Wochentag (Montag-Freitag) gruppieren und darunter immer die jeweilige Information schreiben.
So ungefähr:

Montag
___Eintrag 1
___Eintrag 2

Dienstag
___Eintrag 1
___Eintrag 2
usw.

Ich habe schon viel probiert, aber nichts hat annähernd geklappt.
Den jeweiligen Wochentag habe ich folgendermaßen ermittelt:
Delphi-Quellcode:
Datum := lv_daten.Items[i].caption;
Wochentag := DayofWeek(strtodate(Datum));
Würde mich um eure Hilfe bzw. Denkanstöße sehr freuen.
lg Pitri2

DeddyH 14. Dez 2011 17:56

AW: ListView auslesen gruppiert nach Datum
 
Hallo und Willkommen in der DP :dp:,

eine Standard-Listview kann meiner Kenntnis nach nicht gruppieren. Hast Du mal einen Screenshot parat, wie das rein optisch werden soll?

[edit] Sry, ich muss mich korrigieren, zumindest unter XE gibt es auch einen Gruppeneditor. Leider habe ich den noch nie benutzt und es auf die Schnelle auch nicht hinbekommen, da Einträge gruppiert anzuzeigen. Aber gehen muss es wohl irgendwie. [/edit]

Pitri2 14. Dez 2011 18:19

AW: ListView auslesen gruppiert nach Datum
 
http://imageshack.us/photo/my-images/6/problemnk.png/

Mein ListView ist nach Datum sortiert
Jetzt möchte ich alle Einträge durchgehen und immer die Infos zusammenschreiben, die im gleichen Datum liegen.

lg Pitri2

Pitri2 14. Dez 2011 18:39

AW: ListView auslesen gruppiert nach Datum
 
Jetzt aufeinmal ist mir alles klargeworden und es klappt :)
So habe ich es gelöst:

Delphi-Quellcode:
for w := 1 to 5 do begin
  Memo1.Lines.Add(Wochentag[w+1]);

  for s := 0 to lv_daten.Items.Count -1 do begin
    WTDatum := DayofWeek(strtodate(lv_daten.Items[s].caption));

    if WTDatum = w+1 then begin
      Memo1.lines.add(lv_daten.items[s].subitems[0];
    end;

  end;

end;

DeddyH 14. Dez 2011 18:44

AW: [Gelöst] ListView auslesen gruppiert nach Datum
 
Ich habe gedacht, Du willst die Listview gruppieren. Klarer Fall von Mistverständnis :mrgreen:

Pitri2 14. Dez 2011 18:46

AW: [Gelöst] ListView auslesen gruppiert nach Datum
 
Sry :(
:)


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