DELPHI - How properly close non-modal window

Override event FormClose:

procedure TFGauge.FormClose( Sender: TObject; var Action: TCloseAction );
begin
  Action := caFree;
  self   := nil;
end;