unit usalidas; interface uses SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms, QDialogs, QStdCtrls, QExtCtrls; type Tfentradasp4 = class(TForm) Image1: TImage; Image2: TImage; Image3: TImage; Image4: TImage; Panel1: TPanel; Button1: TButton; Button2: TButton; Label1: TLabel; Image6: TImage; Image7: TImage; Panel2: TPanel; Button3: TButton; Button4: TButton; Label2: TLabel; Image5: TImage; Image8: TImage; Image9: TImage; private { Private declarations } public { Public declarations } end; var fentradasp4: Tfentradasp4; implementation {$R *.xfm} end.