Создание теста в Delphi

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls.{ Private declarations } public.{ Public declarations } end.Приложение unit fmain.TFormmain = class (TForm).Formmain.hide; formtest.Show; end; end.Dialogs, ExtCtrls, StdCtrls, Spin, ComCtrls.TFormTest = class (TForm) buttonnext: TButton.{Очистка формы} procedure clear; begin.{AA} 27,52,76,101,126,151,176:begin case FormTest.RadioGroup1.ItemIndex of.