| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
leticiafaria
Novato
Registrado: Domingo, 10 de Outubro de 2010
Mensagens: 30
|
 Enviada: Dom Out 10, 2010 11:27 am Assunto: Como fazer o maskedit gravar as informações no banco d dados |
 |
|
Bom dia!
Bom gente, estou desenvolvendo meu tcc do curso técnico de informática, já está quase tudo pronto, mas tem alguns erros que ainda não consegui solucionar, e esse é um deles. Pois bem, estou usando o mask edit, para informações como por exemplo o CPF, para ficar no formato xxx.xxx.xxx-xx , porém, não consigo que essas informações sejam salvas no banco de dados.
Por favor, peço ajuda de todos, para me ensinarem como fazer!
Obrigada.  |
|
| Voltar ao Topo |
|
 |
20071780437
Membro Junior
Registrado: Segunda-Feira, 8 de Março de 2010
Mensagens: 310
|
| Enviada: Dom Out 10, 2010 2:41 pm Assunto: Re: Como fazer o maskedit gravar as informações no banco d dados |
|
|
| leticiafaria escreveu: | Bom dia!
Bom gente, estou desenvolvendo meu tcc do curso técnico de informática, já está quase tudo pronto, mas tem alguns erros que ainda não consegui solucionar, e esse é um deles. Pois bem, estou usando o mask edit, para informações como por exemplo o CPF, para ficar no formato xxx.xxx.xxx-xx , porém, não consigo que essas informações sejam salvas no banco de dados.
Por favor, peço ajuda de todos, para me ensinarem como fazer!
Obrigada. |
Na verdade esse é um processo mais simples do que parece, pois já existe um componente semelhante ao MaskEdit que foi feito para trabalhar com banco de dados. O nome do componente do qual eu falo é JvDBMaskEdit, que faz parte da Jedi VCL, que é uma suíte Open Source muito fácil de se encontrar para baixar na internet.
_________________
Thiago Pereira Nobre |
|
| Voltar ao Topo |
|
|
leticiafaria
Novato
Registrado: Domingo, 10 de Outubro de 2010
Mensagens: 30
|
| Enviada: Dom Out 10, 2010 2:49 pm Assunto: |
|
|
| E como eu faço isso? Tem que instalar alguma coisa? |
|
| Voltar ao Topo |
|
|
20071780437
Membro Junior
Registrado: Segunda-Feira, 8 de Março de 2010
Mensagens: 310
|
| Enviada: Dom Out 10, 2010 5:11 pm Assunto: |
|
|
| leticiafaria escreveu: | | E como eu faço isso? Tem que instalar alguma coisa? |
Você tem que baixar e instalar Jedi VCL. Ela vem com dois instaladores, um fica em uma pasta chamada JCL e o outro em uma pasta chamada JVCL, basta você executar o arquivo Instal.bat da primeira e da segunda pasta e pronto.
_________________
Thiago Pereira Nobre |
|
| Voltar ao Topo |
|
|
cyberdisk
Colaborador
Registrado: Domingo, 4 de Julho de 2010
Mensagens: 2391
Localização: São José dos Campos - SP
|
| Enviada: Dom Out 10, 2010 5:12 pm Assunto: |
|
|
salve como string
exemplo:
| Código: | procedure TForm1.BitBtn1Click(Sender: TObject);
var s : string;
begin
s := MaskEdit1.Text;
showmessage(s);
end; |
abraço
_________________
O conhecimento abre muitas portas |
|
| Voltar ao Topo |
|
|
leticiafaria
Novato
Registrado: Domingo, 10 de Outubro de 2010
Mensagens: 30
|
| Enviada: Dom Out 10, 2010 6:56 pm Assunto: |
|
|
Então cyberdisk, já estou usando como string, mais ainda não deu certo.
E também já baixei o JVCL, mas também não consegui que funcionasse.
Obrigada. |
|
| Voltar ao Topo |
|
|
cyberdisk
Colaborador
Registrado: Domingo, 4 de Julho de 2010
Mensagens: 2391
Localização: São José dos Campos - SP
|
| Enviada: Dom Out 10, 2010 10:15 pm Assunto: |
|
|
eu salvo dessa maneira no banco de dados e funciona
| Código: | | DBEdit5.Text := MaskEdit2.Text; |
lembrando que para salvar no banco falta os comandos
Post e ApplayUpdates(-1); ( veja no help do delphi )
abraço
_________________
O conhecimento abre muitas portas |
|
| Voltar ao Topo |
|
|
20071780437
Membro Junior
Registrado: Segunda-Feira, 8 de Março de 2010
Mensagens: 310
|
| Enviada: Dom Out 10, 2010 11:41 pm Assunto: |
|
|
| leticiafaria escreveu: | Então cyberdisk, já estou usando como string, mais ainda não deu certo.
E também já baixei o JVCL, mas também não consegui que funcionasse.
Obrigada. |
O que você não conseguiu que funcionasse? A Jedi VCL ou o JvDBMaskEdit?
_________________
Thiago Pereira Nobre |
|
| Voltar ao Topo |
|
|
leticiafaria
Novato
Registrado: Domingo, 10 de Outubro de 2010
Mensagens: 30
|
| Enviada: Seg Out 11, 2010 12:00 am Assunto: |
|
|
A Jedi VCL.
Na hora de executar o arquivo .bat , ele deu erro. Os dois.
Ae nem tentei usar o programa, porque provavelmente não funcionará, não é?
Se souber me explicar o porque, eu agradeço.
Obrigada. |
|
| Voltar ao Topo |
|
|
20071780437
Membro Junior
Registrado: Segunda-Feira, 8 de Março de 2010
Mensagens: 310
|
| Enviada: Seg Out 11, 2010 12:03 am Assunto: |
|
|
| leticiafaria escreveu: | A Jedi VCL.
Na hora de executar o arquivo .bat , ele deu erro. Os dois.
Ae nem tentei usar o programa, porque provavelmente não funcionará, não é?
Se souber me explicar o porque, eu agradeço.
Obrigada. |
Você estava com o Delphi aberto, ou algum processo que utilize o Delphi?
Pergunto pelo fato de que o Delphi e tudo relacionado a ele deve estar fechado no momento da instalação.
_________________
Thiago Pereira Nobre |
|
| Voltar ao Topo |
|
|
NalDinHuU
Colaborador
Registrado: Segunda-Feira, 26 de Julho de 2010
Mensagens: 1294
Localização: João Pessoa/PB
|
| Enviada: Seg Out 11, 2010 8:12 am Assunto: |
|
|
Cara que Conector você está usando?
ADO, DBExpress, Zeos?
Que Tipo Está Usando?
Query, DataSet?
_________________
Try
Topic.Resolve;
Finally
Topic.Caption := Topic.Caption + '[RESOLVIDO]'; |
|
| Voltar ao Topo |
|
|
leticiafaria
Novato
Registrado: Domingo, 10 de Outubro de 2010
Mensagens: 30
|
| Enviada: Seg Out 11, 2010 10:33 am Assunto: |
|
|
Não não, o Delphi não estava aberto não.
Mais então quer dizer que o MaskEdit não grava mesmo as informações?
Obrigada. |
|
| Voltar ao Topo |
|
|
romenezes
Novato
Registrado: Quarta-Feira, 10 de Setembro de 2008
Mensagens: 31
|
| Enviada: Seg Out 11, 2010 11:13 am Assunto: |
|
|
Como você grava os outros dados no banco?
Quais componentes utiliza? |
|
| Voltar ao Topo |
|
|
leticiafaria
Novato
Registrado: Domingo, 10 de Outubro de 2010
Mensagens: 30
|
| Enviada: Seg Out 11, 2010 11:33 am Assunto: |
|
|
| Como assim? Não entendi |
|
| Voltar ao Topo |
|
|
20071780437
Membro Junior
Registrado: Segunda-Feira, 8 de Março de 2010
Mensagens: 310
|
| Enviada: Seg Out 11, 2010 4:14 pm Assunto: |
|
|
| leticiafaria escreveu: | Não não, o Delphi não estava aberto não.
Mais então quer dizer que o MaskEdit não grava mesmo as informações?
Obrigada. |
Grava sim, mas a diferença é que você vai ter que utilizar comandos para fazer isso.
No momento que uma nova linha é adicionada ou uma linha existente é editada, o valor dele pode ser copiado para um field (campo/coluna) do seu BD e depois basta salvar para que essa alteração seja fixada no BD até que você edit ou remova esta linha.
Para isso dê uma olhada nos comandos: Tabela.Edit, Tabela.Append, Tabela.Post, Tabela.ApplyUpdates(0) ou Tabela.UpdateBatch dependendo do seu componente, Tabela.FieldByName('Campo').Value := xxx.
Aqui vai um exemplo retirado de um programa que eu fiz a bastante tempo atraz e que utiliza banco de dados do Access:
| Código: |
{primeiro passo:
após conectar o seu componente de acesso a dados ao BD e ele estar funcionando, você deve dar um clique com o botão direito nele e selecionar a opção fields editor e nela adicionar todos os fields (campos/colunas) desejados.}
{o resto você pode ver logo abaixo}
{cadastrar usuário}
DataModule4.ADOTable1.Append;
DataModule4.ADOTable1COD_USUARIO.Value:=StrToInt(Edit2.Text);
DataModule4.ADOTable1USUARIO.Value:=Edit3.Text;
DataModule4.ADOTable1SENHA.Value:=Edit4.Text;
Edit2.Clear;
Edit3.Clear;
Edit4.Clear;
Edit2.SetFocus;
{editar usário cadastrado}
DataModule4.ADOTable1.Edit;
DataModule4.ADOTable1COD_USUARIO.Value:=StrToInt(Edit2.Text);
DataModule4.ADOTable1USUARIO.Value:=Edit3.Text;
DataModule4.ADOTable1SENHA.Value:=Edit4.Text;
Edit2.Clear;
Edit3.Clear;
Edit4.Clear;
Edit2.SetFocus;
{cancelar cadastro de usuário}
DataModule4.ADOTable1.Cancel;
{excluir usuário cadastro}
DataModule4.ADOTable1.Delete;
DataModule4.ADOTable1.UpdateBatch;
Edit2.Clear;
Edit3.Clear;
Edit4.Clear;
Edit2.SetFocus;
{salvar cadastro de usuário}
DataModule4.ADOTable1.Post;
DataModule4.ADOTable1.UpdateBatch;
|
O código não está completo e somente foi dividido por comentários, mas acredito que já seja o suficiente para que você entenda como inserir dados na tabela apartir de componentes que não são ligados ao BD.
Vale lembrar que este é só um exemplo, mas há várias outras maneiras de se fazer isso, por exemplo, você poderia utilizar comandos SQL para fazer a mesma coisa.
_________________
Thiago Pereira Nobre |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
