|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
Re: OwnerData ListView - Invalidate,Update,Repaint
25. Feb 2010, 11:56
Hallo und Willkommen in der DP  ,
versuch einmal
Delphi-Quellcode:
procedure MyForm.ListViewColumnClick(
Sender: TObject; Column: TListColumn);
begin
ListView.Items.BeginUpdate;
try
if ascending Then
data.CustomSort(AscendingOrder)
else
data.CustomSort(DescendingOrder);
ascending := Not ascending;
finally
ListView.Items.EndUpdate;
end;
end;
Wobei ich natürlich nicht weiß, was "data" in Deinem Fall ist.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|