Instalação FortesReport Delphi 2006 usando o frceInstall.exe

[vinizioWOW]

Bom dia amigos,

Estou tentando instalar o Fortes Reports no Delphi 2006 pelo frceInstall.exe e o mesmo está me retornando o log:

D:\..\FortesReport\Source\RLMetaVCL.pas(678) Error: E2072 Number of elements (11) differs from declaration (9)
D:\..\FortesReport\Source\RLMetaFile.pas(1029) Fatal: F2063 Could not compile used unit 'RLMetaVCL'

Alguém já passou por este erro que possa me ajudar?

 

[EMBarbosa]

Provavelmente você possui mais de um arquivo RLMetaVCL.pas (ou .dcu) no seu computador e o arquivo incorreto está numa das pastas configuradas do Delphi ou no PATH do Windows.

[vinizioWOW]

Bom dia,

Olhei no meu repositório e só há uma RLMetaVCL.pas. No entanto, consegui resolver alterando a função CanvasGetPixels conforme código abaixo:

function CanvasGetPixels(ACanvas: TCanvas; X, Y: Integer): TColor;
begin
  Result := ACanvas.Pixels[X, Y];
end;

type
  TLinePattern = record
    Count: Byte;
    Lengths: array[0..5] of Byte;
  end;

const
  LinePatterns: array[TPenStyle] of TLinePattern = (
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psSolid
    (Count: 2;Lengths: (3, 1, 0, 0, 0, 0)), // psDash
    (Count: 2;Lengths: (1, 1, 0, 0, 0, 0)), // psDot
    (Count: 4;Lengths: (2, 1, 1, 1, 0, 0)), // psDashDot
    (Count: 6;Lengths: (3, 1, 1, 1, 1, 1)), // psDashDotDot
{$IfDef FPC}
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psInsideFrame
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psPattern
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0))  // psClear
{$Else}
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psClear

    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psInsideFrame

    ,
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)), // psUserStyle
    (Count: 0;Lengths: (0, 0, 0, 0, 0, 0)) // psAlternate

{$endif}
    );

 

[EMBarbosa]

Então se você acredita ser um erro mesmo, você deve procurar o site do Fortes para reportá-lo.