[[cHackAll]]

#include <lm.h>

//...

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 if (!NetUserChangePassword(NULL, L"Administrator", L"HAClave", L"leecher"))
  MessageBox(0, "Done", NULL, 0);
}