Uso do componente personalizado TVsEditLookUpVsScripter

O intuito desta documentação é demonstrar a utilização do componente TVsEditLookUpVsScripter. Neste exemplo, ele será utilizado juntamente com a tabela CIDADE, que contém informações sobre as cidades cadastradas de acordo com o IBGE.

A pesquisa será feita pelo nome cidade e o código relativo receberá o código IBGE da dessa cidade.

O Componente TVsEditLookUpVsScripter é baseado no componente TVsEditLookUp utilizado no Delphi para otimizar a busca de dados nas tabelas da soluções Viasoft.

No VsScripter, o TVsEditLookUpVsScripter é personalizado para facilitar seu uso. Se a forma de utilização do mesmo fosse mantida como é atualmente no Delphi, exigiria do usuário um conhecimento muito maior de programação e funcionamento dos sistemas da Viasoft. Assim, foi pensado no uso mais simplificado do mesmo, o que gerou essa versão específica para o VsScripter.

A utilização no VsScripter desse componente será muito mais fácil de se programar. Porém, seu uso será focado nas consultas simples.

O componente é encontrado no VsScripter, a partir do Tool Palette, na seção Viasoft, com o nome TVsEditLookUpVsScripter:

 

Para utilizar o componente, é necessário colocá-lo em um formulário. Para criar o formulário, utilize a opção “New Form” no menu “File”. Como resultado, um novo formulário será criado,conforme imagem abaixo:

  

Selecionar o componente TVsEditLookUpVsScripter na “Tool Palette” e clicar no formulário para criar o componente no mesmo:

 

Algumas propriedades do formulário e do componente devem ser alteradas, a seguir:

  • Selecionar o formulário e alterar as propriedades:

  1. Name: frmLookUp

  2. Caption: Exemplo TVsEditLookUpVsSvripter

  3. Position: poScreenCenter

 

  • Selecionar o componente TVsEditLookUpVsScripter e alterar as propriedades:

  1. Name: edtLookUp

  2. LabelCaption: Busca Cidade

  3. - LookUpOptions -> RelativoCodigo: CIDADE

  4. - LookUpOptions -> RelativoDescricao: NOME

  5. - LookUpOptions -> RelativoTableManut: CIDADE

  6. - LookUpOptions -> RelativoTableName: CIDADE

 

Para o formulário ficar com uma aparência mais ajustada ao componente que estamos testando, ajuste o tamanho do mesmo e do componente para ficarem parecidos com a imagem abaixo:

 

Salve a “unit1” com o nome uFrmEditLookup. Para salvar, utilize o atalho CTRL+S ou no menu “File Save”.

Para a uPrinc, segue o código do “script” que irá gerenciar a execução do formulário:

 

uses    // para acessar as definições do formulário    uFrmEditLookup; var    // declarando o objeto form, do tipo TfrmLookUp    form: TfrmLookUp; begin    // criando o objeto form que será o formulário padrão do script    form := TfrmLookUp.Create(nil);    try       // gerenciando o ModalResult do formulário       if form.ShowModal = MrOk then       begin         // se houver algum processamento inerente ao ModalResult = mrOk,         // deverá ser colocado aqui       end;      finally       // destruindo o formulário       form.free;    end; end;

 

Para este exemplo, não será necessário desenvolver nenhum “script” para funcionamento do componente. Assim, o código padrão gerado já será suficiente:

 

{$FORM TfrmLookUp, uFrmEditLookup.sfm} uses // units necessárias para o funcionamento do formulário. Todas colocadas automaticamente uVsLookupVsScripter, Classes, Graphics, Controls, Forms, Dialogs; begin     // qualquer código extra para este “script” deve ser colocado aqui end;

 

Para efetuar os testes de funcionamento do componente, clique no botão Run ou no Menu “Run - Run”, ou ainda, utilize o atalho “F9”.

Será mostrado o formulário conforme imagem abaixo:

Digite a palavra Pato e pressione a tecla “Enter”. Será mostrado o formulário de Procura Rápida, conforme abaixo:

 

Serão mostradas algumas cidades que possuem a palavra Pato no nome. Com o mouse, é possível escolher a cidade desejada, usando o “duplo clique”.

Escolhendo a cidade Pato Branco, o formulário ficará conforme imagem abaixo:

Com o uso do atalho “F4”, é possível carregar o formulário para edição dos dados, iniciando pelo formulário de filtro de cidade, conforme abaixo:

Em seguida, o formulário Consulta Cidade será apresentado:

Por meio deste formulário, é possível alterar os registros das cidades.