Помогите с формами в Lazarus
unit Main;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
Image1: TImage;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
end;
var
Form1: TForm1;
implementation
uses
u_form2, u_form3;
{$R *.lfm}
procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.Show;
Form1.Hide;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
form3.Show;
Form1.Hide;
end;
end.
Когда я нажимаю на Начать, я хочу что бы другая форма открылась в той же позиции что и первая форма.



