Google Chrome and Firefox password decryption in Delphi

I need a Delphi snippet that decrypts the passwords stored in new Google Chrome and Firefox browsers (let's say the browsers released in the past 5 years). The snippet should be as small as possible and I want to be able to compile it in Delphi 7.