Este é um post disponível para assinantes MVPou para quem possui Créditos DevMedia. Clique aqui para saber mais!
Artigo Clube Delphi 95 - Desenvolvendo uma Aplicação Completa com PocketStudio
Artigo publicado pela Clube Delphi edição 95.

Clique aqui para ler essa revista em PDF.![]()
Mini-Curso
Desenvolvendo uma Aplicação Completa com PocketStudio
Aprenda a criar aplicações para o sistema operacional PalmOS – Parte 4
Continuando o artigo da edição anterior, iremos criar a última tela de nossa aplicação que será a tela de digitação de itens do pedido. Após concluirmos a criação da mesma iremos desenvolver um conduit para sincronizarmos com o Desktop e trocarmos informações. O objetivo do nosso conduit será enviar para o Desktop as tabelas de itens de pedido e pedidos, e receber do Desktop as tabelas de produtos e clientes. Sempre que o usuário conectar o cabo USB no Palm e no Desktop selecionar o HotSync o sincronismo será realizado e os dados atualizados, a regra é sempre primeiro enviarmos os dados do Palm para o Desktop e depois recebermos os dados do Desktop para o Palm. Mãos à obra, vamos criar a tela de Itens de Pedido para depois entrarmos em detalhes do Conduit.
Criando a tela de digitação de itens do pedido
Vamos adicionar um novo formulário para criarmos a tela de digitação de itens do pedido, no menu principal do PocketStudio em File|New>Form, após adicionarmos o mesmo vamos salvá-lo clicando em File|Save ou pelas teclas de atalho CTRL + S, salvaremos ele com o nome “UfrmPedidoItem.pas” para indicarmos que é a Unit de itens do pedido. Feito isso altere seu Name para “FrmItensPedido” e Caption para “Itens do Pedido”.
Desenharemos uma tela semelhante à Figura 1. Para isso inclua (todos da paleta Forms) um componente List(“LstItens”), quatro Label’s com os Caption’s “Total do Pedido”, “Qtde.” e “Preço”. Altere a propriedade fonte do primeiro Label para ftBold. Em seguida adicione ao lado de cada Label um componente Field representando um campo da tabela. Incluiremos FldTotPed, FldCodProd, FldDescricao, FldQtde e FldPreco. Os botões chame-os de BtnVoltar, BtnProcurar, BtnNovo, BtnGravar e BtnExcluir. Se optar por utilizar Bitmap’s para representar as ações nos botões, não esqueça de incluir quatro Bitmap’s e nomeá-los como BmpProcurar, BmpNovo, BmpGravar e BmpExcluir. Caso tenha dúvidas da utilização de imagens nos botões, retorne aos artigos anteriores e veja como realizamos a tarefa de inclusão de Bitmap’s nas telas anteriores.

Figura 1. Tela dos itens do pedido
Antes de codificarmos os botões vamos escrever algumas funções que irão nos auxiliar nas validações dos dados informados e limpar a tela quando o usuário clicar no botão Novo para incluir um novo item no pedido.
Além disso trabalharemos com um novo conceito, o de manipulação de listas. Logicamente o componente List que incluimos na janela listará os Itens do Pedido conforme adicionarmos. Existem várias maneiras de “alimentarmos” a lista para apresentar os itens. Uma delas seria fazer um laço(“loop”) e percorrer a tabela de itens do pedido adicionando-os à lista, para isso usaríamos a função "
Este é um post disponível para assinantes MVPou para quem possui Créditos DevMedia. Clique aqui para saber mais!
Ricardo C. Boaro
Ricardo Boaro (rboaro@gmail.com). Trabalha com desenvolvimento de sistema com Delphi há mais de 15 Analista de Sistema na Comercial João Afonso Ltda - SP. Embarcadero Certified: Instructor, Delphi 7 e Delphi 2007, Developer Certified



