From 9c64ab80396e38ec094ec06b78fdd607b1071d8a Mon Sep 17 00:00:00 2001 From: juha Date: Thu, 24 Nov 2011 09:21:55 +0000 Subject: [PATCH] Improve a GUI string in FileBrobser. git-svn-id: trunk@33752 - --- components/filebrowser/regidefilebrowser.pp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/components/filebrowser/regidefilebrowser.pp b/components/filebrowser/regidefilebrowser.pp index 3745cd28bf..ee8baeb7c9 100644 --- a/components/filebrowser/regidefilebrowser.pp +++ b/components/filebrowser/regidefilebrowser.pp @@ -59,7 +59,7 @@ const resourcestring SFileBrowserIDEMenu = 'IDEFileBrowser'; - SFileBrowserIDEMenuCaption = 'File Browser window'; + SFileBrowserIDEMenuCaption = 'File Browser'; { TFileBrowserController } @@ -92,6 +92,7 @@ var D: string; begin FWindow := TFileBrowserForm.Create(Self); + FWindow.Caption:=SFileBrowserIDEMenuCaption; FWindow.FreeNotification(Self); FWindow.OnOpenFile := @DoOpenFile; FWindow.OnConfigure := @DoConfig;