Instalando o pacote ZEOS Access no Lazarus 0.9.24

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

[ Hits: 16.528 ]

 


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

Firebird - Backup de banco de dados

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

Criando log de erro para seus programas Kylix

Corrigindo o erro: C compiler cannot create executables

Problema: programa não roda fora do Kylix

Leitura recomendada

Explorando e resolvendo vulnerabilidade local no kernel Linux

Reinstalando Linux sem fazer backup ou formatação no KDE

Como obter o MAIN PID de um processo com SystemD (e manipulá-lo a seu gosto)

Expandindo partição ext3 em discos lógicos e qcow2 em ambiente de virtualização

Ubuntu 12.04 - Ingressando no AD pela Tela de Login

  

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