From e77a3ec06d2a760aa7b668889ede8281e3882989 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Tue, 28 Aug 2007 23:18:25 +0000
Subject: [PATCH] Fix displaying the current database in childwins window
 caption.

---
 source/childwin.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/childwin.pas b/source/childwin.pas
index b79a2dac..d8cc895c 100644
--- a/source/childwin.pas
+++ b/source/childwin.pas
@@ -1282,9 +1282,9 @@ begin
   tabData.TabVisible := false;
 
   pnlTableTop.Caption := 'Table-Properties';
-  Caption := Description + ' - /' + ActualDatabase;
   ActualDatabase := db;
   EnsureActiveDatabase;
+  Caption := Description + ' - /' + ActualDatabase;
   ActualTable := '';
   try
     ShowDBProperties( Self );