[chino150]

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