From 1980f92cb1b2fcaa020d938c25d01e9d25b76e51 Mon Sep 17 00:00:00 2001
From: "rosenfield.albert"
 <rosenfield.albert@40cadd2d-89a2-4482-8f20-0232d845d7e3>
Date: Thu, 12 Mar 2009 21:32:28 +0000
Subject: [PATCH] Bugfix: fix issue #1055.

---
 source/connections.pas | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/source/connections.pas b/source/connections.pas
index 83f140a2..2aa521dd 100644
--- a/source/connections.pas
+++ b/source/connections.pas
@@ -43,6 +43,7 @@ type
     btnDelete: TToolButton;
     btnSaveAs: TToolButton;
     btnEditDesc: TButton;
+    procedure CreateParams(var Params: TCreateParams); override;
     procedure FormCreate(Sender: TObject);
     procedure btnSaveAndConnectClick(Sender: TObject);
     procedure FormClose(Sender: TObject; var Action: TCloseAction);
@@ -71,6 +72,14 @@ implementation
 {$R *.DFM}
 
 
+procedure Tconnform.CreateParams(var Params: TCreateParams);
+begin
+  inherited;
+  Params.ExStyle := Params.ExStyle OR WS_EX_APPWINDOW;
+  Params.WndParent := GetDesktopWindow;
+end;
+
+
 {**
   FormCreate
 }