本例子综合了delphi中ADO组件的控件的使用