Вчера обновил trunk лазаруса, при пересборке с полной очисткой вопит в самом конце при компиляции IDE:
sourcefilemanager.pas(6452,29) Error: identifier idents no member "DesignPPI"
на этом участке кода:
Код: Выделить всё
{$IF (FPC_FULLVERSION >= 30003)} // TDataModule.DesignPPI was added in FPC 3.0.3
if NewComponent is TDataModule then
begin
DsgDataModule := TDataModule(NewComponent);
if (DsgDataModule.DesignPPI<>Screen.PixelsPerInch) then
begin
DesignerProcs.ScaleNonVisual(DsgDataModule, DsgDataModule.DesignPPI, Screen.PixelsPerInch);
DsgDataModule.DesignOffset := Point(
MulDiv(DsgDataModule.DesignOffset.x, Screen.PixelsPerInch, DsgDataModule.DesignPPI),
MulDiv(DsgDataModule.DesignOffset.y, Screen.PixelsPerInch, DsgDataModule.DesignPPI));
DsgDataModule.DesignSize := Point(
MulDiv(DsgDataModule.DesignSize.x, Screen.PixelsPerInch, DsgDataModule.DesignPPI),
MulDiv(DsgDataModule.DesignSize.y, Screen.PixelsPerInch, DsgDataModule.DesignPPI));
DsgDataModule.DesignPPI := Screen.PixelsPerInch;
end;
end;
{$ENDIF}
Свойство DesignPPI в обозревателе кода открывается, версия fpc 3.0.3, тоже собирал из транка.
Никто больше не сталкивался?
