Programação Windev - Parte 2
Autor: Maicol Genz | Publicado: 2013-04-29T20:00:00-07:00



&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Bom! Continuando o post sobre Programação Windev, segue o link da primeira postagem -&gt;&nbsp;http://maicoljoaogenz.blogspot.com.br/2011/12/programacao-windev.html&nbsp;.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Partiremos para a parte de fazer um cadastro simples. Primeiramente, aperte Ctrl + N, ou vá no menu File -&gt; New e clique em Window:&nbsp;











&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Em seguida clique duas vezes em Blank, aperte Ctrl + S e
salve com o nome de Win_updateCidade, ajuste a tela com o tamanho que achar
necessário, agora arraste 3 Edt’s para a tela, veja onde pegar a edt, campo
rabiscado na imagem a seguir:




<!--[if gte vml 1]><v:shape
 id="Imagem_x0020_2" o:spid="_x0000_i1033" type="#_x0000_t75" style='width:425.25pt;
 height:266.25pt;visibility:visible;mso-wrap-style:square'>
 <v:imagedata src="file:///C:\Users\Maicol\AppData\Local\Temp\msohtmlclip1\01\clip_image003.png"
  o:title="NewEdt"/>
<![endif]--><!--[if !vml]--><!--[endif]-->

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp;Após colocar as 3 Edt’s é preciso renomear as mesmas, para
fazer isso selecione a primeira edt e da um enter, ai digite Cep:, e assim faça
com a edt de Cidade e de UF, &nbsp;depois
selecione os botões Validate e Cancel, veja onde pegar esses botões na imagem a
seguir:






&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Veja como ficou a minha tela na imagem a seguir:






&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Agora vamos para a parte do código dessa tela de Update. &nbsp;Primeiramente precisamos criar uma Procedure
que traga uma referência da Browser, para podermos diferencia se é um novo registro
ou alteração de registro. Para fazer isso clique na área verde ao lado da tela
e tecle F2 para ir no código da tela, abrirá a seguinte tela:





&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Digite aquela primeira linha. Essa linha que dirá que quando
chamarmos a tela de update lá do browser deveremos mandar o parâmetro chamado
Cep_cidade.

&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Agora colocaremos o código que chama os dados quando estarei
alterando o registro, tendo assim uma condição (um IF ), verificando se o
Cep_cidade vem em branco significa que é uma inserção, que neste caso não
faremos nada se for uma inserção, mas se Cep_cidade for diferente de embranco
traremos os dados para a tela, veja e copie o código na parte de Initialization:






&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Antes de continuar na tela de Update, vamos voltar para a
Browser de Cidades, clique fora da tela para entrar no código, selecione o código
que está na inicialização e clique com o botão direito e clique em Create a
local procedure containing the selected mode, veja na imagem a seguir:






&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;De o nome de BuscarCidades e clice no verdade para salvar.

Agora Voltando para a tela de update, no design, selecione o
botão Salvar e pressione F2 para ir ao código, e no Click BTN_Gravar coloque o
seguinte código:














&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Bom, no código acima estamos verificando se é uma inclusão
ou alteração de registro, e executando as funções adequadas para cada operação,
se ele vier embranco ele executa o código de inserção, que vai ate o ELSE, se
vier diferente de embranco o Cep_cidade, ele executa o comando para alterar o
registro.


&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Aquela penúltima linha chamamos a função de buscar as
cidades para atualizar a grid quando salvarmos algum registro.


&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Após ter colocado esses dados voltando para a tela de
Browser, adicione os botões New, Modify e Delete, altere os seus nomes do mesmo
jeito das edt’s, selecionando e pressionando enter.


&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Entre no código do botão Incluir selecionando o botão e
apertando F2, e coloque o seguinte código: OBS, sempre cuidar com os nome, de
repente os nomes que você colocar pode estar um pouco diferente dos que eu
colocar.






&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;No código do alterar coloque o
seguinte código:






<!--[if gte vml 1]><v:shape
 id="Imagem_x0020_10" o:spid="_x0000_i1025" type="#_x0000_t75" style='width:425.25pt;
 height:266.25pt;visibility:visible;mso-wrap-style:square'>
 <v:imagedata src="file:///C:\Users\Maicol\AppData\Local\Temp\msohtmlclip1\01\clip_image019.jpg"
  o:title="btnalterar"/>
<![endif]--><!--[if !vml]-->&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Veja que o parâmetro no incluir é “”(embranco),
e no alterar pegamos a tabela.coluna da grid.


&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Agora aperte em GO ou pressione Ctrl + F9 e pode testar.


&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;A princípio deve estar funcionando. Qualquer dúvida estou a
disposição.