type
 TPrimeFrm = class(TForm)
 NumEdit: TEdit;
 SpawnButton: TButton;
 ResultsMemo: TMemo;
 procedure SpawnButtonClick(Sender: TObject);
 private
 { Private declarations }
 public
 { Public declarations }
 end;