DrawText modified

diff --git a/bottleclient/BottleChainListFrame.pas b/bottleclient/BottleChainListFrame.pas
index b24b6eb..b7add02 100755 (executable)
--- a/bottleclient/BottleChainListFrame.pas
+++ b/bottleclient/BottleChainListFrame.pas
@@ -74,12 +74,12 @@ begin
 
   lstRules.Canvas.Font.Style := lstRules.Canvas.Font.Style + [fsBold];
   Str := BottleChainRuleList[Index].Title;
-  y := DrawText(lstRules.Canvas.Handle, PChar(Str), -1, Rect, DT_NOPREFIX or DT_EDITCONTROL or DT_WORDBREAK);
+  y := DrawText(lstRules.Canvas.Handle, PChar(Str), -1, Rect, DT_NOPREFIX or DT_WORDBREAK);
   lstRules.Canvas.Font.Style := lstRules.Canvas.Font.Style - [fsBold];
   Str := BottleChainRuleList[Index].StringExpression;
   Rect.Top := Rect.Top + y;
   Rect.Left := Rect.Left + 5;
-  DrawText(lstRules.Canvas.Handle, PChar(Str), -1, Rect, DT_NOPREFIX or DT_EDITCONTROL or DT_WORDBREAK);
+  DrawText(lstRules.Canvas.Handle, PChar(Str), -1, Rect, DT_NOPREFIX or DT_WORDBREAK);
 end;
 
 procedure TfrmBottleChainList.Button1Click(Sender: TObject);