Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Ошибка в Delphi XE

Автор: xamel87 5.1.2012, 21:39

При компиляции выкидывает ошибку [DCC Error] ZSysUtils.pas(1028): E2010 Incompatible types: 'PPointerList' and 'TPointerList' ссылаясь на данный кусок кода

Код


procedure TZSortedList.Sort(Compare: TZListSortCompare);
begin
  if (List <> nil) and (Count > 0) then
    QuickSort(list, 0, Count - 1, Compare);
end;

Ругается на 4 строку, на List
П.С. попытка адаптировать ZeosLIB 7.0.0 под Delphi XE
П.С.С. Проблемму с PChar решил путем PAnsiChar (вроде)

Автор: CodeMonkey 7.1.2012, 03:24

Гм, а чего его портировать, если он и так DXE поддерживает?

В любом случае, ...

D7:

Код

type
  PPointerList = ^TPointerList;
  TPointerList = array[0..MaxListSize - 1] of Pointer;
...
procedure QuickSort(SortList: PPointerList; L, R: Integer;
  SCompare: TListSortCompare);

DXE:

Код

type
  PPointerList = ^TPointerList;
  TPointerList = array[0..MaxListSize - 1] of Pointer;
...
procedure QuickSort(SortList: PPointerList; L, R: Integer;
  SCompare: TListSortCompareFunc);

DXE2:

Код

type
  PPointerList = ^TPointerList;
  TPointerList = array of Pointer;
...
procedure QuickSort(SortList: TPointerList; L, R: Integer;
  SCompare: TListSortCompareFunc);

Разницы между Delphi 7 и Delphi XE никакой нет. Разница есть между DXE и DXE2. Поэтому есть мнение, что кто-то врёт.