Instalando o pacote ZEOS Access no Lazarus 0.9.24

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

[ Hits: 14.721 ]

 


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

Corrigindo o erro: C compiler cannot create executables

Pesquisando arquivos pelo seu conteúdo em modo texto

Problema: programa não roda fora do Kylix

Problemas ao compilar o MPlayer no Slackware Linux 12.1

Leitura recomendada

Recuperar a senha de root no Debian alterando o arquivo shadow

Bloqueando pasta no Linux

Zimbra Collaboration Server 7 - Community Edition

Seminário Linux em São Paulo - 22/10/2004 - entrada franca

Cinnamon no Fedora 17

  

Comentários

Nenhum comentário foi encontrado.



Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner
Linux banner
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts