Gostaria de iniciar este post agradecendo os elogios que tenho recebido a respeito do meu artigo de ZeosDBO, publicado na edição 109 da Clube Delphi . Muitos leitores tem tido dúvidas a respeito da instalação do componente, então resolvi publicar um passo-a-passo ilustrando todo o processo. Primeiramente baixe a versão 6.6.5 no link: http://sourceforge.net/projects/zeoslib/files/Zeos%20Database%20Objects/zeosdbo-6.6.5-stable/ZEOSDBO-6.6.5-stable.zip/download
Após finalizar o download, descompacte a biblioteca dentro de um diretório qualquer de sua preferência. No meu caso criei a pasta ZeosDBO para a extração dos componentes, conforme mostra a Figura 1.


Figura 1. Diretórios após a extração do componente

-->">

Olá Pessoal,

Estive recebendo alguns e-mails sobre o meu artigo de métodos relatando que o código da Listagem 2 não foi impresso na revista. Verificando, constatei que realmente o código não consta no artigo. Segue então uma errata da Listagem 2 com o código que faltou. Peço desculpas, e estou inteiramente a disposição para o que precisarem!

Listagem 2.  Evento OnClick do botão btnCalcular

01  procedure TfrmPrincipal.btnCalcularClick(Sender: TObject);

02  var Operacao : TOperacao;

03  begin

04    case rgOperacao.ItemIndex of

05    0 : Operacao := toSoma;

06    1 : Operacao := toSubtracao;

07    2 : Operacao := toDivisao;

08    3 : Operacao := toMultiplicacao;

09    end;

10    edtOpResultado.Text :=

11      TMathClass.ExecutaOperacao(

12        edtOp1.Text,

13        edtOp2.Text,

14        Operacao);

15  end;

Um grande abraço,
Daniel.
-->">