unit sample0; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, ExtCtrls; type TForm1 = class(TForm) CardName: TLabel; Label3: TLabel; GroupBits: TRadioGroup; GroupRange: TRadioGroup; GroupOutput: TGroupBox; LOutput: TLabel; Label2: TLabel; Value: TTrackBar; GroupChannel: TRadioGroup; StatusBar1: TStatusBar; AddressList: TComboBox; Memo1: TMemo; ExitButton: TButton; Initialize: TButton; ISAPanel: TGroupBox; Label1: TLabel; ISAEdit: TEdit; private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.DFM} end.