unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Db, ADODB, comobj; type TForm1 = class(TForm) ADO: TADOConnection; ADOQuery1: TADOQuery; Button2: TButton; Button3: TButton;... Read More