how do I make a button that opens another form

[sasue11]

Hi,
My computer is windows 64 (it is 64-bits) I am very new to the forum so please tell me if I did something wrong...here is question: i would like to know how to make a button that opens another form when it is clicked...just send me the source code for it and I will use it in my program^^...
THX
[GS]HACKER

[Blaazen]

In Lazarus: Create New Project -> Application
Now you have the 1-st Form.
Menu: File -> New Form
Now you have the 2-nd Form
Add "Unit2" to "uses" section of Unit1.

Code: [Select]

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, Unit2;
Add Button on Form1 from components (Standart palette)

In Object Inspector select Button1, tab Events, event OnClick (double click it)
(or double click Button1 on the Form1)

It will add

Code: [Select]

procedure TForm1.Button1Click(Sender: TObject);
begin

end;
to your Source Editor.
Type there:

Code: [Select]

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
end;
That's all.

[sasue11]

Thanks!!!

[Shebuka]

Code: [Select]

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
end;
That's all.

This only if you select to auto create that form in project options.

[Zoran]

Code: [Select]

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
end;
That's all.

This only if you select to auto create that form in project options.

No, you don't have to select this option, it is the default, you only must not remove it from the auto-create list.

[vdubeau]

i'm was also interested in doing this. I tried out your example and it worked great.

Thanks