Uso delphi 2010, mysql e Zeos 7.0 alpha, e preciso cadastrar o usu�rio, porem ele pega o c�digo do usuario que estou cadastrando e insere no campo nome e senha valor do codigo tamb�m

Question

na hora que consulta no banco de dados os registro aparece assim:codigo: 5, nome: 5, senha:5     ZQusuario.Active:=false;      ZQusuario.Close;      ZQusuario.SQL.Clear;      ZQusuario.SQL.Add(...

Mateus Ribeiro · Answer

Boa tarde!Os campos no banco de dados, possuem as informa��es corretas? Verifica se sem querer vc n�o cadastrou todos os campos com o valor 5 l�......

Neilson · Answer

Ent�o Mateus, a tabela foi criada dessa seguinte maneira:

create table usuario(

codigo integer not null primary key,
nome varchar(50) not null,
senha varchar(50) not null);

essa tabela s� tem um registro, que no caso seria "codigo:1, nome:admin, senha:123" para abrir o sistema, at� tudo funciona perfeitamente, quando executo o sistema e vou na tela de cadastro usu�rio, na hora de cadastrar executo essa sql:

ZQusuario.Active:=false;
ZQusuario.Close;
ZQusuario.SQL.Clear;
ZQusuario.SQL.Add('insert into login values(:codigo,:nome,:senha)');
ZQusuario.ParamByName('codigo').AsInteger:=strtoint(EDTcodigo.Text);
ZQusuario.ParamByName('nome').AsString:=EDTnome.Text;
ZQusuario.ParamByName('senha').AsString:=EDTsenha.Text;
ZQusuario.ExecSQL;

at� ai tudo funciona, na hora que vou olhar no banco para se foi que aquilo mesmo que eu pedir para cadastrar ai aparece assim:
[img]http://arquivo.devmedia.com.br/forum/imagem/446352-20150806-151825.png[/img]

Mateus Ribeiro · Answer

Huum, eu te aconselho a fazer o seguinte...

Faz um select geral no componente ZQusuario e deixa ele fixo l�:

SELECT * FROM LOGIN

Depois, com o bot�o direito no ZQusuario, vai em FIELDS EDITOR... Depois bot�o direito novamente e clica em ADD ALL FIELDS pra adicionar todos os campos dessa tabela.

Agora pra salvar fica mais f�cil

ZQusuario.Insert;
ZQusuarioLOGIN.Value:= EDTLogin.Text;
ZQusuarioNOME.Value:= EDTNome.Text;
ZQusuarioSENHA.Value:= EDTSenha.Text;
ZQusuario.Post;
ZQusuario.ApplyUpdates;

Espero que ajude!

Neilson · Answer

Muito obrigado Mateus Ferreira, deu certo aqui, valeu mesma pela ajuda....

F�rum Uso delphi 2010, mysql e Zeos 7.0 alpha, e preciso cadastrar o usu�rio, porem ele pega o c�digo do usuario que estou cadastrando e insere no campo nome e senha valor do codigo tamb�m #527962