Artigo Clube Delphi Edição 3 - Sistema de Biblioteca – Parte III

Sistema de Biblioteca – Parte III

Estamos novamente as voltas com nosso sistema de biblioteca. Vamos relembrar todo o processo e como o sistema funciona:

O sistema tem como objetivo de controlar os empréstimos e devoluções de livros em um biblioteca. A aplicação não foi criada visando nenhuma situação real, e tem o puro objetivo de facilitar o aprendizado ao acesso de banco de dados com o Delphi. Nesta biblioteca virutal, temos apenas três  cadastros: livros, Leitores e Empréstimos (assim como devoluções). Na primeira edição do jornal vimos o cadastro de leitores e na segunda o cadastro de livros. Se você não acompanhou as edições anteriores do nosso Jornal, visite nosso site (www,clubedelphi.com.br) ou mande um email para admin@clubedelphi.com.br, para saber como adquirí-las

Relembrando, criamos a estrutura das tabelas da seguinte forma:

Figura 1: formulário modelo

Como vimos na etapa passada, já possuímos um Template (modelo) para todos os formulários de cadastro do nosso sistema. Este modelo foi criado exatamente para economizarmos tempo na hora da criação do form, já que muitas das características são comuns aos nossos cadastros.

Continuaremos agora criando o formulário de cadastro de Empréstimos de livros. Este form ficará parecido com a figura 3

O primeiro passo é criar as tabelas no Database Desktop, caso já não estejam criadas.

Vamos agora iniciar a programação – entre no Delphi e abra o nosso projeto, chamado Biblio. Crie um novo formulário, e chame-o de cadatro de empréstimos. Para isto, usaremos o nosso modelo de form de cadastro, criado na edição anterior. O modelo já possui muito do trabalho pronto, e isto é um grande ponto positivo. Clique no menu File, opção New, para chamar o Object Repository.

Figura 2: repositório de objeto

Clique duas vezes sobre o ícone de nosso modelo. Não esqueça de selecionar a opção

Copy, na parte inferior do Repositório, um novo formulário será criado.

Salve o projeto e chame o arquivo de CadEmprestimo e o nome do formulário de FrmCadEsprestimos. Configure o objeto Ttable e DataSource presente no formulário com as características abaixo.