Gustavo.deo Posted April 24, 2018 Share Posted April 24, 2018 Good Morning!!! I have a password encryption function to write to the database !!! But I'm having problems ... in the application to win the word pave2010 in function gets zk€o<:;: However due to unigui using utf-8, it returns zk'#$0080'o<:;: I have tried to change the charset in servermodule but I did not succeed ... Any suggestion?? function TFuncoes.EncryptPassWord(sPassWord:String):String; var i : Integer; begin Result := sPassWord; for i := 1 to Length(Result) do Result := Chr(Ord(Result) + 10); end; Quote Link to comment Share on other sites More sharing options...
Sherzod Posted April 24, 2018 Share Posted April 24, 2018 Hi, Which edition and build are you using ?! Quote Link to comment Share on other sites More sharing options...
mhmda Posted April 24, 2018 Share Posted April 24, 2018 We do encrypt passwords using hash algorithm and when it comes to sensitive data we encrypt it using RSA (with salt), and we never had a problem at all with unigui. Quote Link to comment Share on other sites More sharing options...
Marlon Nardi Posted April 24, 2018 Share Posted April 24, 2018 If it helps. FS.Crypt.rar Quote Link to comment Share on other sites More sharing options...
bahry Posted April 24, 2018 Share Posted April 24, 2018 There is a lot of function to help you deal with UTF8 and strings http://docwiki.embarcadero.com/RADStudio/Tokyo/en/UTF-8_Conversion_Routines Quote Link to comment Share on other sites More sharing options...
Gustavo.deo Posted April 27, 2018 Author Share Posted April 27, 2018 Thank you all!!! All the reviews were very helpful !!! Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.