Ir para conteúdo
  • Cadastre-se

dev botao

Fortes Report no Delphi 2006


leufmt
  • Este tópico foi criado há 4568 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Seguinte pessoal, tentei instalar o fortes report 3.70B no delphi 2006 e esta dando erro quando adiciono o pacote blp lá em install packages.

Segue o erro: Este aplicativo não pôde ser iniciado porque não foi encontrado rtl70.bpl. A reinstalação do aplicativo pode corrigir o problema.

Alguém sabe alguma forma de resolver isto?

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Nesse caso é "menos mal" :) vc pode abrir um Package mais próximo (mas inferior) ao do seu Delphi, e ajusta-lo se necessário, removendo ou substituindo alguma Lib na seção do "Requires"... (geralmente isso não é necessário... seria só compilar)

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

criei uma nova package mas quando compilo vem esses erros:

[Pascal Error] RLUtils.pas(910): E2003 Undeclared identifier: 'CharInSet'

[Pascal Error] RLUtils.pas(910): E2015 Operator not applicable to this operand type

E olhando essa unit verifiquei o seguinte trecho, lá no começo:

{$IFDEF DELPHI7}

//Esta funções existem a partir do Delphi 2009 e foram recriadas para evitar warnings

function CharInSet(C: AnsiChar; const CharSet: TSysCharSet): Boolean; overload;

function CharInSet(C: WideChar; const CharSet: TSysCharSet): Boolean; overload;

{$ENDIF}

e aqui onde é chamada esta função que dá o erro:

function IterateJustification(var AText: string; var AIndex: Integer): Boolean;

function FindSpc: Boolean;

const

SPC = [#32, #9, #13, #10];

begin

Result := False;

while (AIndex > 0) and CharInSet(AText[AIndex], SPC) do

Dec(AIndex);

while AIndex > 0 do

if CharInSet(AText[AIndex], SPC) then

begin

while (AIndex > 0) and CharInSet(AText[AIndex], SPC) do

Dec(AIndex);

if AIndex > 0 then

begin

Insert(#32, AText, AIndex + 1);

Result := True;

end;

Break;

end

else

Dec(AIndex);

end;

begin

Result := FindSpc;

if not Result then

begin

AIndex := Length(AText);

Result := FindSpc;

end;

end;

agora não sei o que fazer.

Tem alguma ideia Daniel?

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Infelizmente não tenho mais dicas... instalei o Fortes Report no meu D7 a partir dos binários...

Atualmente uso apenas Lazarus, e o FortesReport para Lazarus é mantido por outra equipe...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • 11 meses depois ...

Consegui resolver este erro assim : (achei em outro forum)

* É so adicionar DELPHI7 no campo Conditional Defines na aba Directories/Conditionals das opções do projeto.

Este bloco só é compilado se estiver setado DELPHI7 nas opções do projeto.

No meu caso acusou erro no arquivo RLMetaVCL, ai desabilitei algumas linhas q nao se referiam ao D2006, compilo e instalo certinho.

Espero q sirva pra + alguem

  • Curtir 2
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 4568 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.