Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
procedure TForm1.Button1Click(Sender: TObject);
begin
form2 := tform2.Create(self);
form2.Show;
end;
procedure TForm1.chiudi2Click(Sender: TObject);
begin
ActiveMDIChild.Close;
form2.Free;
end;