《delphi 尝试历险》范例程序。