Как создать новую форму, которая бы не отбирала фокус у существующей?

Своим опытом делится Олег Кулабухов:

uses Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2 := TForm2.Create(Application);
Form2.Visible := FALSE;
ShowWindow(Form2.Handle, SW_SHOWNA);
end;

[001842]

Содержание раздела