Ausblenden des Hauptformulars(SDI), aber nicht daraus erzeugte Child Formulare

[KodeZwerg]

Ich weiß nicht genau ob es das ist wonach Du suchst aber zumindest kannst Du hiermit Dein Hauptfenster minimieren/verstecken und all Deine anderen Fenster bleiben offen.

Delphi-Quellcode:

{ -----------------------------------------------------------------------------
  Unit Name: frClient
  Unit Pfad: C:\DelphiSourceXE\PostIt_2022
  Projekt  : PostIt
  Plattform:

  Uses: CodeSiteLogging, DsUnitXE3,
  ### ChangeLog
  28.01.2021
  28.01.2021 Createdatum
  ----------------------------------------------------------------------------- }
unit frClient;

interface

uses //CodeSiteLogging,
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, System.Types,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Menus, Vcl.DBCtrls, Data.DB, DBAccess, Uni, MemDS;

type
  TfrmClient = class(TForm)
    PopMnu: TPopupMenu;
    nmuDelete: TMenuItem;
    DBMmo: TDBMemo;
    Qry: TUniQuery;
    ds: TUniDataSource;
    QryIDNR: TIntegerField;
    QryFrmName: TStringField;
    QrysNotiz: TStringField;
    QryBKColor: TStringField;
    QryclTop: TIntegerField;
    QryclLeft: TIntegerField;
    QryclHeight: TIntegerField;
    QryclWidth: TIntegerField;
    QryiStayOnTop: TIntegerField;
    nmuStayOnTop: TMenuItem;
    dlgColor: TColorDialog;
    nmuColor: TMenuItem;
    QryftColor: TStringField;
    nmuFtColor: TMenuItem;
    procedure nmuDeleteClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure DBMmoChange(Sender: TObject);
    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
    procedure nmuStayOnTopClick(Sender: TObject);
    procedure DBMmoMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
    procedure DBMmoMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
    procedure DBMmoMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
    procedure nmuColorClick(Sender: TObject);
    procedure nmuFtColorClick(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  private
    FInitialPos: TPoint;

    procedure SaveSetUp;

    { Private-Deklarationen }
  public
    PubiIDNR: Integer;

    bDel: Boolean;

    procedure SetData(iIDNR: Integer);

  end;

var
  frmClient: TfrmClient; // frClient

implementation

uses frPostIt;

{$R *.dfm}

procedure TfrmClient.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := 0;
end;

CodeSiteLogging habe ich nicht, deine eigene DsUnitXE3 fehlt leider auch im Download.
Wenn ich beides auskommentiere und entsprechende Zeilen ändere kann ich Dein Projekt starten.