Verständnisfragen zu Forms

[baumina]

Delphi-Quellcode:

unit Main;

   ....

implementation

uses Unit1;

 ....
Procedure ShowUnit1;
begin
  Form1.Show;
end;

end.

Delphi-Quellcode:

unit Unit1;

interface

uses
   ....

type
   TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
   private
     { Private-Deklarationen }
   public
     { Public-Deklarationen }
   end;

var
   Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure Unit1.Button1Click(Sender: TObject);
begin
  Form2.Show;
  Close;
end;

end.