Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi sortieren innerhalb der Komponente TListView (https://www.delphipraxis.net/43516-sortieren-innerhalb-der-komponente-tlistview.html)

EccoBravo 5. Apr 2005 10:52


sortieren innerhalb der Komponente TListView
 
Hallo,

gleich ein neues Problem:

ich schreibe gerade eine eigene Komponente von TListView. Nun möchte ich diese neue TListView nach einer oder der anderen Spalte sortieren.
Einen Code, der dieses in dem aktuellen Projekt unter "MyListView1ColumnClick(..)" tut habe ich.
Ich möchte aber diese Aufgabe in den Code der Komponente selbst verschieben, dass ich das Sortieren mit einem Einzeiler unter "MyListView1ColumnClick()" aus dem Projekt heraus durchführen kann.

Vielen Dank für einen Tip

E. B.

MathiasSimmack 5. Apr 2005 11:01

Re: sortieren innerhalb der Komponente TListView
 
Zitat:

Zitat von EccoBravo
Einen Code, der dieses in dem aktuellen Projekt unter "MyListView1ColumnClick(..)" tut habe ich.
Ich möchte aber diese Aufgabe in den Code der Komponente selbst verschieben, dass ich das Sortieren mit einem Einzeiler unter "MyListView1ColumnClick()" aus dem Projekt heraus durchführen kann.

Ja, dann tu es doch. Sorry, aber deine Frage ist jetzt welche? :gruebel: Füge den Code in deine TListView-Ableitung ein, und stell ihn als öffentliche Prozedur/Funktion für das aufrufende Programm zur Verfügung.

EccoBravo 5. Apr 2005 12:21

Re: sortieren innerhalb der Komponente TListView
 
ja, wenn das so einfach ginge!

Im Projekt habe ich bisher ein ListView1, in dem mit der Ereignisroutine on ColumnClick folgender Code implementiert war:
Delphi-Quellcode:
Procedure TF_Haupt.ListView1ColumnClick(Sender:TObject; Column: TListColumn);
begin
    ColumnToSort:=Column.Index;
    (Sender as TCustomListView).AlphaSort;
    AscDesc(Column.Index):=-1*AscDesc(ColumnIndex);
end;
Das Übernehmen dieser Codesequenz geht leider nicht, es ist nich tegal, ob man das"ColumnToSort" Von einer TListView-Methode oder der Instanz ListView1 aufruft.

Vielen Dank

E. B.


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