Besoin d'explication : Pourquoi ca marche ?

Tout d'abord bonjour à tous et bonne année !!!

Je débute en delphi et histoire de comprendre comment ca marche je fais quelques petits "essais" et je suis tombé sur un problème de compréhension du langage.

Voici ma question :
mon projet contient un programme principal (essai) 2 forms (main et client) . Sur la première Form, j'ai 2 boutons : 'Consulter' et 'Modifier' qui comme vous l'aurez compris vont ouvrir la seconde Form soit en consultation soit en modification.
le code ci-joint fonctionne (pour tester, je modifie simplement le titre de la seconde fenêtre).

Ma question est la suivante : pourquoi suis-je obligé de mettre Application.CreateForm(TForm_client, Form_client); dans mon programme principal (ligne en rouge) alors que j'ai déjà Form_client.FormCreate(Form_client,mode_choisi); dans les fonctions évenementielles des boutons (lignes en bleu) ?

D'avance merci pour vos réponses.

voici le codes des trois Unit :
********************************************
le programe
********************************************
program essai;

uses
  Forms,
  main in 'main.pas' {Form_main},
  client in 'client.pas' {Form_client};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm_main, Form_main);
  Application.CreateForm(TForm_client, Form_client);
  Application.Run;
end.

******************************************
Unit main : contient les deux boutons
******************************************
unit main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, client;

type
  TForm_main = class(TForm)
    Btn_consulter: TButton;
    Btn_modifier: TButton;
    procedure Btn_consulterClick(Sender: TObject);
    procedure Btn_modifierClick(Sender: TObject);
  private
  public

  end;

var
  Form_main: TForm_main;
  mode_choisi:string;

implementation

{$R *.dfm}


procedure TForm_main.Btn_consulterClick(Sender: TObject);
begin

mode_choisi:='consulter';
Form_client.FormCreate(Form_client,mode_choisi);
Form_client.ShowModal;
end;

procedure TForm_main.Btn_modifierClick(Sender: TObject);
begin
mode_choisi:='modifier';
Form_client.FormCreate(Form_client,mode_choisi);
Form_client.ShowModal;
end;
end.

************************************************
Unit client : une fenetre vierge où seul le Caption est mis à jour
************************************************
unit client;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm_client = class(TForm)
    procedure FormCreate(Sender :TObject; var mode:string);
  private
    { Private declarations }
  public
  end;

var
  Form_client: TForm_client;

implementation

{$R *.dfm}
procedure TForm_client.FormCreate(Sender :TObject; var mode: string);
begin

if mode='consulter' then
  Form_client.Caption:='Consultation'
else
  Form_client.Caption:='Modification'
end;

end.