From 3ed97298dcf24b0330ed6b7b454f6d6d985265fc Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sat, 12 May 2012 13:04:57 +0000
Subject: [PATCH] LCL: Fix ShowMessage cutting the last word after char "&",
 issue #21913, patch from samuel herzog

git-svn-id: trunk@37256 -
---
 lcl/include/promptdialog.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/include/promptdialog.inc b/lcl/include/promptdialog.inc
index 1f347164ba..a95dad6790 100644
--- a/lcl/include/promptdialog.inc
+++ b/lcl/include/promptdialog.inc
@@ -255,7 +255,7 @@ begin
   TextBox := Rect(0, 0, Screen.Width div 2, Screen.Height - 100);
   SelectObject(Canvas.Handle, Screen.SystemFont.Reference.Handle);
   DrawText(Canvas.Handle, PChar(MSG), Length(MSG),
-    TextBox, DT_WORDBREAK or DT_CALCRECT);
+    TextBox, DT_WORDBREAK or DT_CALCRECT or DT_NOPREFIX);
 
   // calculate the width we need to display the buttons
   MinBtnWidth:=Max(25,MinimumDialogButtonWidth);