Olá galera, nesta Quick Tips irei mostrar como criar um formulário a partir de uma string, mas indo mais além vou fazer um cadastro de Forms, em XML mesmo, para ficar mais interessante, sendo possível cadastrar seus formulários e montar um menu dinamicamente. Então vamos ao primeiro passo, montar o esquema do XML, que poderá ser aplicado ao seu banco de dados, e lido da mesma forma.
Criando um XML para armazenar os dados.
Salve o Form aberto como FrmCadastro e sua Unit como uFrmCadastro.
Adicione ao projeto
1 – ClientDataSet (CDSForms)
1 – DataSorce ( DSForms)
1 – DBGrid( DBGridForms )
1 – DBNavigator (DBNavigatorForms)
CDSForms
Adicionar os seguintes Fields
Name | FieldType | Size |
IDForm | AutoInc | - |
Descricao | String | 80 |
Categoria | String | 80 |
Nome | String | 80 |
File Name = DBForm.XML
IndexFieldNames = Categoria
Clique com o Botão direito em cima do mesmo, e no menu pop clique em CreateDataSet
DSForms
DataSet = CDSForms
DBGridForms
DataSorce = DSForms
DBNavigatorForms
DataSorce = DSForms
Em seguida iremos montar a tela de cadastro, arrastando os Fields para o Formulário
E sua tela ficará assim
Agora iremos adicionar mais 3 formulários, para não estender o trabalho braçal, vamos deixar somente estes 3 como exemplo, e criando um conseguiremos criar quantos outros forem necessários.
Crie os 3 Forms
Name | Unit | Descricao |
FrmCliente | uFrmCliente | Formulários criados que seram chamados pelo menu |
FrmFornecedor | uFrmFornecedor | Formulários criados que seram chamados pelo menu |
FrmPrincipal | uFrmPrincipal | Onde colocaremos o menu |
Obs : Cadastre alguns formulários, porém esta rotina precisa que a propriedade Nome, no CDSForms, seja cadastrada igual ao nome dos forms que formos criar.
Fico por aqui e na próxima Quick Tips, antes de partirmos para próxima Quick Tips, peço que cadastrem os 2 formulários de Cliente e Fornecedor na tela acima desenvolvida, para podermos prosseguir nas dicas.
Um abraço
Wesley Y
wyamazack@rwsolution.com.br