procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs); Var m_random : System.Random; begin m_random.Next; end;