Ich habe jetzt das Ereignis auf das folgende abgeändert und die Column-Auswahl funktioniert jetzt
Delphi-Quellcode:
procedure TTS_Maschinen.VST_MaschinenHeaderClick(Sender: TVTHeader; HitInfo: TVTHeaderHitInfo);
begin
with Sender do
begin
if (SortColumn = HitInfo.Column) and (SortDirection = sdAscending) then
SortDirection := sdDescending
else
SortDirection := sdAscending;
SortColumn := HitInfo.Column;
end;
end;
Leider springt er jetzt aber nicht in das CompareNodes Ereignis und sortiert mir dann die Spalte wirklich.
Was könnte dafür die Ursache sein?
Vielen Dank.