Cita:
Empezado por Casimiro Notevi
Pues danos más información, no podemos trastear tu pc y tu código
|
Código Delphi
[-]procedure TForm1.btnSafeClick(Sender: TObject);
var
User: String;
Role: String;
Pass: String;
begin
User := txtName.Text;
Role := cbRole.Text;
Pass := txtPassword.Text;
Zquery1.Close;
Zquery1.SQL.Clear;
Zquery1.SQL.Add ('INSERT into users(u_username,u_rolecode,u_password)VALUES("User", "Role", AES_ENCRYPT("Pass", "abcd")');
Zquery1.ExecSQL;
este es el código, uso delphi seattle, mysql 5.7.11 y zeos