program testip; uses Forms, testi in 'testi.pas' {FormPelipohja}, AI in 'AI.pas'; {$R *.RES} begin Application.Initialize; Application.CreateForm(TFormPelipohja, FormPelipohja); Application.Run; end.