Добрый день!
Долгое время писал на С++, а тут возникла необходимость писать на Делфи и сразу столкнулся с такой проблемой:
в общем у меня есть список с указателями на записи
type
sr = record
dateF : TDateTime;
count : integer;
... : ...
end;
var
psr : ^sr;
psr^.dateF := date;
List.Add(psr)
мне необходимо сделать сортировку списка по полю dateF, попытался сделать как в справке, но компилятор на меня ругается
function CompareSR(Item1, Item2: Pointer): Integer;
begin
Result := CompareDateTime(psr(Item1).dateF, psr(Item2).dateF);
end;
List.Sort(@CompareSR)
как я понимаю надо привести Item1 и Item2 к типу psr, но паскаль изучал 10 лет назад и как это сделать незнаю.