Umstieg Delphi 7 auf Delphi 2007 - Probleme?

[Markos]

Delphi-Quellcode:

Procedure TCustomImageList.CreateImageList;
const
  Mask:array[Boolean] of Longint = (0, ILC_MASK);
begin
  FHandle := ImageList_Create(Width, Height, ILC_COLORDDB or Mask(Masked), AllocBy, AllocBy);
  if not HandleAllocated then raise EInvalidOperation.Create(SInvalidIMageList);
  if FBkColor <> clNone then BkColor := FBkColor;
end;