Instalando o pacote ZEOS Access no Lazarus 0.9.24

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

[ Hits: 15.060 ]

 


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

Pesquisando arquivos pelo seu conteúdo em modo texto

Problema: programa não roda fora do Kylix

Corrigindo o erro: C compiler cannot create executables

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

Firebird - Backup de banco de dados

Leitura recomendada

Backup e restore das regras de ACLs

Hardening no OpenBSD

Criar usuario no Linux sem senha

Recuperando a senha de root de forma simples e rápida

Ubuntu - Atualização através de servidor proxy

  

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