Luigi Auriemma

aluigi.org (ARCHIVE-ONLY FORUM!)
It is currently 19 Jul 2012 14:42

All times are UTC [ DST ]





Forum locked This topic is locked, you cannot edit posts or make further replies.  [ 2 posts ] 
Author Message
 Post subject: Has anyone converted aluigi's STEAMPWD from C to DELPHI
PostPosted: 19 Apr 2009 23:58 

Joined: 19 Apr 2009 23:01
Posts: 13
i really want to incorporate aluigi's code in my latest open source DELPHI project.

how would i go about implementing aluigi's code in a DELPHI project

thank you


Top
 Profile  
 
 
 Post subject: Re: Has anyone converted aluigi's STEAMPWD from C to DELPHI
PostPosted: 20 Apr 2009 00:14 

Joined: 16 Aug 2007 06:25
Posts: 367
The simplest method seems to be calling SteamDecryptDataForThisMachine from the Steam.dll. You will also have to get the encrypted password from the clientregistry.blob (Luigi explains how to do this here: steam-password-recovery-t488.html)... but once you do so, the code below works. Of course you'll have to re-write it in Delphi because it's written for AutoIT scripts, but it shows the basics.

Code:
$EncryptKey = "71627C0E720E06BE2060E6A209EFA434731B87103E330306611C93774800EF8E8D58A37AA603B06811FC5D714637"
$SteamPath = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Valve\Steam", "InstallPath")
$steamdll = DLLOpen($SteamPath & "/Steam.dll")
$aCall = DllCall($steamdll, "int:cdecl", "SteamDecryptDataForThisMachine", _
        "str", $EncryptKey, _
        "int", StringLen($EncryptKey), _
        "str", "", _
        "int", 65535, _
        "dword*", 0)
      
$FinalPassword = $aCall[3]
MsgBox(64, "Steam Login Info", $FinalPassword)


Top
 Profile  
 
Display posts from previous:  Sort by  
Forum locked This topic is locked, you cannot edit posts or make further replies.  [ 2 posts ] 

All times are UTC [ DST ]


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for: