designingUI Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls, ImgList, Mask, DBCtrls, Grids, DBGrids, DB, ADODB, Buttons type TaddS = class(TForm) Bevel1: TBevel Label1