Instalando o pacote ZEOS Access no Lazarus 0.9.24

Publicado por Anderson de Assis de Souza em 06/12/2007

[ Hits: 15.804 ]

 


Instalando o pacote ZEOS Access no Lazarus 0.9.24



O Lazarus é uma ferramenta de programação livre, similar ao Delphi usado no Windows.

O Lazarus, nos componentes mais avançados, é de costume deixar o usuário escolher e baixar os componentes, geralmente no formato LPK.

Para acesso a banco de dados eu recomendo o ZEOS Access. Esta dica parte do princípio que vocês já tenham o Lazarus 0.9.24 instalado e saibam instalar um pacote comum LPK.

O problema é que o ZEOS Access funcionava muito bem no Lazarus 0.9.22 e 0.9.23. Na versão 0.9.24, ao compilar o pacote aparece um erro de parâmetros.

Para resolver este probleminha, vá no diretório do pacote de instalação do ZEOS, em seu sub diretório src/component/, abra o arquivo "ZAbstractRODataset.pas" e procure o trecho de código igual ao mostrado abaixo:

const
BaseFieldTypes: array [TFieldType] of TFieldType = (ftUnknown, ftString, ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime, ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString, ftLargeint, ftADT, ftArray, ftReference, ftDataSet, ftOraBlob, ftOraClob, ftVariant, ftInterface, ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd);

Deve-se adicionar mais dois parâmetros para corrigir o problema, são eles:
  • ftFixedWideChar, ftWideMemo

O trecho de código resultante ficará assim:

const
BaseFieldTypes: array [TFieldType] of TFieldType = (ftUnknown, ftString, ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime, ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString, ftLargeint, ftADT, ftArray, ftReference, ftDataSet, ftOraBlob, ftOraClob, ftVariant, ftInterface, ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd, ftFixedWideChar, ftWideMemo);

Veja abaixo um screenshot do resultado, o Lazarus 0.9.24 funcionando com o pacote ZEOS Access instalado, rodando sem problemas.



OK. Espero ter ajudado.

Outras dicas deste autor

Programação Kylix: Informações do menu na barra de status

Firebird - Backup de banco de dados

Corrigindo o erro: C compiler cannot create executables

Criando log de erro para seus programas Kylix

Instalando o Macromedia Flash no Linux

Leitura recomendada

Sarg no CentOS 6 - Configuração com suporte a gráficos

Instalando o Linux num pen drive

MAMONA - Plataforma Linux para sistemas embarcados

Transferindo arquivos do Windows para Linux

Conectando Linux com celulares através de Bluetooth

  

Comentários

Nenhum comentário foi encontrado.



Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts