Estou com uma dificuldade no delphi (sou iniciante)
11/04/2017
0
cInc.Close;
cInc.CommandText :='Insert Into Usuario (ID, Login, Senha, Nome, CodGrupo, Funcao) Values ( ( Select Max(ID)+1 From Usuario), ' +
'Login ' + edLogin.Text + ',' +'Senha ' + edSenha.Text + ',' +'Nome ' + edNome.Text + ',' +
'CodGrupo ' + edGrupo.Text + ',' + 'Funcao '+ edFuncao.Text +')' ;
cInc.Open;
cInc.Append;
a onde estou errando?
Matheus Quandt
Post mais votado
11/04/2017
Vocês esta replicando as palavras login, senha e nome tanto no set quando nos values.
Seus values devem conter somente os valores e não os nomes das colunas que quer setar. Isso : 'Login ' + edLogin.Text deve ser apenas isso edLogin.Text, ao colocar os valores lembre de colocar o quotedstr.
Se desejar utilizar como paramentro faça assim :
Insert Into Usuario (ID, Login, Senha, Nome, CodGrupo, Funcao) Values ( ( Select Max(ID)+1 From Usuario), :Login, :Senha, :Nome, :CodGrupo, :Funcao)
em seguida utilize o paramByName para setar os parâmetros desejados
Espero ter ajudado.
Gutierry Pereira
Mais Posts
11/04/2017
Raylan Zibel
Se é um clientdataset sem conexao, precisa chamar o metodo CreateDataSet e passar valores pros Fields do Client.
11/04/2017
Raylan Zibel
Isso não faz sentido:
cInc.Open; cInc.Append;
11/04/2017
Matheus Quandt
eu ja havia visto isso tbm
foi um descuido mesmo assim muito obrigado a vcs
Clique aqui para fazer login e interagir na Comunidade :)